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1.0 GENERAL program information 


1.1 Abstract 

The RX 1 1 interface diagnostic consists of a series of selectable tests 
that may be run individually, sequence through all tests, or start at 
a selected test and run through remaining tests, in order, then go 
back to the selected test. 

These tests check out the basic functions of the RXT1 interface such 
as: 

1. Done flag 

2. Interrupt level / address 

3. Program initialise 

4. Read status registers 

5. Fill / empty buffer transfer verification 

6. Fill / empty buffer with data patterns 

It is necessary to insure that these functions work before a data 
reliability test is run. 

Any errors are reported by the program, and it is possible to loop on 
the error or a particular test for scope testing. 


1.2 System Requirements 

1.2.1 Hardware Requirements 

The following equipment is required: 

1. PDP-11 series computer with minimum of 8k memory 

2. RX 1 1 floppy disk system, including a single or dual drive 
0X01 and a PDP-11 Interface card Lm78463. 


NOTE 

A diskette must be included with each drive tested. 


SEQ 0004 


t 


c 

T 

1 

t 


l 

1 

r 

h 


5. Console teleprinter 


F 1 
Page 5 


1.2.2 Software Requirements 
No prerequisite software 


2.0 OPERATING INSTRUCTIONS 


2.0.1 Outline of Operating Procedure 

The standard running procedure for the diagnostic ( to run all tests 
on both drives with no operator intervention via the switch register) 
is as follows: 

1. Load the program into memory 

1. If it is being loaded from a diskette replace the 
"library" diskette with a "scratch" diskette. 


NOTE 

If this step is forgotten and the program was loaded 
via RXDP (floppy monitor) on unit 0 with unit 0 
selected by user to undergo testing the program w f ll 
failsafe the operation and prompt the user as 
follows: "Caution - If you desire to test unit 0 
replace load medium with a scratch diskette then 
press continue" 


Caution again, however 


NOTE 

When running this program on a Small 11 
(e.g /0A, LSI 11, etc.) Where there is 
no console switch register it is 
imperative to remember this setup. 



NOTE 
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Before proceeding to Step B, ensure that 
the following modifiable locations 
contain the parameters you require for 
testing. The following table describes 
each location with respect to the 
default parameters which will be used if 
left unmodified by the user: 


LOCATION 

LABEL 

CONTENTS 

PROGRAM REACTION 

1200 

0D: 

0 

TRACKS 0.52,53,114(8) 

1202 

FIRST: 

015001 

SECTORS 1 THRU 32(8) 

1204 

KRXVEC: 

264 

ASSUMES PROPER DEVICE VECTOR 

1206 

RXCS: 

177170 - 

ASSUMES PROPER DEVICE 

STATUS REGISTER 
(CALCULATES 'RXDB* ' * . 
ADDRESS FROM)- > ' 

1212 

DTESTP: 

0 / / . 

1 

TESTS BOTH UNITS 

AUTOMATICALLY SEQUENCES ,, 

THRU ALL TESTS 

1214 

BRLEV: 

5 ' 

- ASSUMES PROPER DEVICE r% 

. ’BR’ LEVEL ; V * / 


Reference section 2 of this document for a more V.thoroughv description ^ 
of each of these items and how to modif y.these locations, i f^ you desire 
to change the above mentioned default' testing parameters. , /* .. * • ’ 

2. Start the program at location 200;/ ;r- 

3. The program will type out maindec .number , /a' test parameter of 

0 (use both drives and run all tests). \;Then type tracks to - 
be accessed and sector limits.' : The. program -^is now\,running 
all tests in sequence. 4 *' 


accessed and sector limits.' The. program ^>is .now ' .running 
tests in sequence. > c .Vy/v- - ' 

' ' > •* : • "i- . ' - -> - 

- * * f » » •* s - </ V 1 ^ * < * 

there are no errors, at the end ,of the pass .(approx..* 50 
onds run time), a "D" wi ll be typed and.it will continue 
for anoth»r pass. ; 


5. To halt the test at any time (after or t before completion of a 
pass) just halt the processor. ' “ *. 


6. After completing a pass of the- diagnostic,, the RX 1 1 

reliability test may be run. . . \ \ ’ 

* ' ' f > » 

7. There are two types of error print out formats: 

1. Tests pretest, 1 - 17, and 21 - 23 use the format shown 
in section 3.1. The important address there is the 
"ERADR" (Error Address) go to the listing at that 
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location to get more information on the error condition 

2. Test 20, and 24 - 26 use the format shown in section 3.3. 
In this case the "TEST PC" is the address of the test 
being run when the error occurred. Then the v’tal 
information of the error is printed (contents of all 
registers, address of where on tne diskette the error 
occurred, and the type of error). 


2.1 Loading The Program 

Load the program into memory using 
paper tapes. Make sure the total 
diskettes inserted properly, doors 


the standard procedure for binary 
system is ready for operation. The 
closed on drives to be tested etc. 


2.2 Starting Addresses 

The program has two starting address locations as follows: 


2.2.1 Initial Start Cloc.2003 

This starting address tests for and selects the hardware, or software 
switch register, prints maindec name and revision, the test and drive 
selection, and tracks and sectors being used. 


2.2.2 Restart Cloc.2023 

This starting address directs the program to continue runnina using 
the dri/e and test selections specified in the previous initial start. 


2.3 Operator Action Before Starting The Program 


2.3.1 Device Address Selection 

Like most options on the PDP-11 the RX 1 1 Interface Card has jumperable 
register and vector addresses. This allows for devices with the same 
standard addresses to be jumpered to an other address so they will run 
without conflict. 

The program must know what addresses are being used, as it is through 
these register and vector addresses that all communication between the 
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PDP-11 and the R X 1 1 is handled. 

If the R X 1 1 system under test is jumpered for register addresses other 
than standard, which is RXCS =■ 177170 and RXDB = 177172 place in the 
memory location called ”RXCS" [Loc.1206] its new address. The program 
assumes the next even address above that of RXCS, will be the address 
of RXDB, so setting that address is not necessary. If there is a 
nonstandard interrupt vector address (standard is Loc. 264 ) then 
place in memory location called "KRXVEC" Cloc. 1204] its new address. 

If either of these locations is loaded with a wrong address, the 
program will get unpredictable errors and may halt. 


NOTE 

The program expects that the priority 
level jumpers are set for a normal 'BR' 
level of 5 (contents of program location 
’BRLEV : ' is set to 5). If the priority 
level jumpers are set to any other level 
tests 344 will report errors, unless 
program location 'BRLEV:' has been 
patched to contain the relevent 'BR* 
level before executing the program. 


If this is being tested on a LSI 11, tests 3 and 4 will not be run as 
the LSI 11 has only 1 level of interrupt. 


2.3.2 Non-Standard Diskette Address Selection 

If it is desirable to test the diskette between track and sector 
address limits other than the preselected track addresses, and/or 
minimum (first) and maximum (last ) sector addresses, this is done by 
the operator making changes to two memory locations before the program 
is started. One location is called ”0D'' Cloc. 1200] which contains 
the two bytes for inner and outer track addresses. The other location 
is called "FIRST” and it contains the two bytes for the first and last 
sector addresses. 


1 . 


2 . 


Def ini t ions 

OD = Address of track at outer diameter (min. 0) 

ID = Address of track at inner diameter (max. 114) 

FIRST = Address of first sector on a track (min. 1) 

LAST r Address of last sector on a track (max. 32) 


Locat ions 


Tracks location 

1200 

bits 

14 8 

ID 

6 — -0 
0 D 

Sectors location 

1202 

bits 

12 8 

■T* 

1 

a 

i 

i 

o 
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IASI FIRST 

3. Restrictions 

The value of "OD" must be less than or equal to the value of 
"ID”. The value of "FIRST” must be less than or equal to the 
value of "LAST". 

If these locations are changed to new limits, then the program will 
access onl> those addresses inclusive of and between these limits. 
The exception to this is test 26 which always uses a special track 
sequence. 

If the "OD" location is cleared or set to any illegal combination of 
tracks, the program will clear location "OD". The track sequence will 
then be tracks 0, 52, 53, and IK (octal) only. 

If the "FIRST" location is cleared or set to any illegal conbination 
of sector addresse limits then the program will set FIRST" to 1 and 
"LAST" to 32 (octal). 


2.3.3 Software Switch Register (Loc. 176) 

For the POP 11 processors that do not have a hardware switch register 
or if the operator wishes to select the software switch register, by 
putting all the switches up to a "1", (this must be done each time the 
program is started at location 200, otherwise the program will use the 
hardware SUR.) Location 176 is assigned as the switch register. Bits 
set to a "1" in this location have the same function as the 
corresponding switch in the hardware switch register. All references 
to the $yR are indirect ana the program assigns the correct address of 
the SUR at "initial start". See Section 2. A. 2 for the selection of 
operating conditions. 

To change the software SUR. while the program is running, type 
"control G". Each time the SUR. is to be tested the program will 
check to see if the software SUR is selected, and the program is not 
running in auto mode of RXDP/ACT11. If both conditions exist then the 
program checks for the CTRL G in the keyboard buffer. If the CTRL G 
is there the contents of the software SUR. are printed and a "new =" 
is asked for. The operator may now type in the new switch register 
contents, terminated by a carriage return (CR), or if he doesn't want 
to change the SUR. just terminate with the (CR). Note see the 
character restrictions below. 

uhen the program detects the (CR) it will replace the contents of the 
software SUR., if a new one has been typed in, and return to the flow 
of the program. 
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NOTE 

Character restrictions for changing the 
software SUR. 


1. Only octal numbers 0-7 are accepted. Any other character 
typed will be printed as a ? and the whole SWR must be 
retyped. 

2. To wipe out a "new" contents just typed in, type CTRL U. Now 
a new contents can be retyped. 

3. Only 6 octal characters will be put into the SUR. If more 
than 6 characters are typed in only the last 6 will be put 
into the SWR. 


2. 3. A Test Parameter Selection ("DTESTP" Loc. 1212) 

The drive and test delection must be made before the program starts. 
Location "DTESTP" (Loc. 1212) is where the bits are set to tell the 
program what drives are wanted and what tests to run as indicated 
below. When the program starts it will print out the conditions under 
which it is running. 

Bit 15 (1) Select Drive Unit 1 
Bit 14 (1) Select Drive Unit 0 


NOTE 

If neither of the above bits are set to 
a 1, then the program expects both 
drives to be ready for operation (power 
on. diskettes inserted, and doors 
closed) . 
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Then set the test selection in bits 4. 3. 2,1, and 0 as follows: 


"OTESTP" BITS 


15 

14 

13- 

5 4 

3 2 10 



ui 

uo 

NOT 

USED 

TESTS 

BITS 4 

3 

2 

1 

0 


TESTS 

0 

0 

0 

0 

0 

(If I 

NO TEST SELECTED DEFAULTS TO TEST 1) 

0 

0 

0 

0 

1 

TEST 

1 

0 

0 

0 

1 

0 

TEST 

2 

0 

0 

0 

1 

1 

TEST 

3 

0 

0 

1 

0 

0 

TEST 

4 

0 

0 

1 

0 

1 

TEST 

5 

0 

0 

1 

1 

0 

TEST 

6 

0 

0 

1 

1 

1 

TEST 

7 

0 

1 

0 

0 

0 

TEST 

10 

0 

1 

0 

0 

1 

TEST 

11 

0 

1 

0 

1 

0 

TEST 

12 

0 

1 

0 

1 

1 

TEST 

13 

0 

1 

1 

0 

0 

TEST 

14 

0 

1 

1 

0 

1 

TEST 

15 

n 

1 

1 

1 

0 

TEST 

16 

0 

1 

1 

1 

1 

TEST 

17 

i 

0 

0 

0 

0 

TEST 

20 

i 

0 

0 

0 

1 

TEST 

21 

i 

0 

0 

1 

0 

TEST 

22 

i 

0 

0 

1 

1 

TEST 

23 

i 

0 

1 

c 

0 

TEST 

24 

i 

0 

1 

0 

1 

TEST 

25 

i 

0 

1 

1 

0 

TEST 

26 


NOTE 

Selection of tests 27 through 37 will 
cause the message "illegal test" to be 
printed. 


NOTE 

When a specified test is selected the 
program will start at that test and then 
run through all the following tests 
until it completes test 26, indicated by 
the EOP type out. Then it will go back 
to the test selected and start the next 
pass. (i.e. If test 24 is selected the 
program will rn test 24, 25, and 26, 
then go back to test 24.) 


An expanded definition of the tests is in section 2.5 
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2 . 3 .<• - 1 Prerequisite Of Tests: - The following tests oust be run in 
order , as one test sets up for the next test. 

Test 6 before tests 7 and test 10 
Test 14 before test 15 and test 16 
Test 16 before test 17 
Test 21 before test 22 and test 23 

See section 2.5 under the above tests for explanation 


2.4 Operator Action To Run The Program 


“1 


2.4.1 Starting the Program 

Depending upon the starting address selected the program will do the 
following: 

SA200 (Initial Start) 

The selection of hardware or software switch register is made 
then the program will type its identification number, the 
test parameters selected in location "DTESTP", and tracks and 
sectors being tested. The program then proceeds to run under 
those conditions. 

SA202 (Restart) 

The program will type out the test parameters selected- by the 
previous initial start, prints the diskette address limits, 
and starts running the tests. The only operator action 
required is to set the operating conditions as defined in 
Section 2.4.2, after depressing the "LOAD ADRS" switch and 
before depressing the start switch. 


2.4.2 Operating Conditions 

After tne test selection has been made press the "CONT” switch. The 
program will then ask for operating conditions. Switches 0 and 8 
through 15 are used as indicated below. Once they are set up again 
depress the "CONT*’ switch. The program is now running under the 
selected conditions. 

SW15-SW0 (1) - Select Software Switch Register 


If there is a hardware switch register, 
and the operator wants the software 
switch register, put all switches up (1) 
befort starting the program at the 
initial start address. 
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i 1 ) - Malt on Error 

The program halts on detecting an error, after printing the 
error message. Pressing "C0NT“ restores the normal operation 
of the program. 


( 1 ) Halt at End of Pass 

It "end of His- t 
indicator. 


the program types a bell then an EOP 


“0” means no errors during the pass 
means had errors during the pass 

If SWU is set the program will halt. If SUU is off the 
program goes back to the test selected and recycles through 
to the last test, at which time another EOP indicator is 
printed. If the program halts due to SWU then press "CONT" 
will restore the normal flow of the program. If it halts at 
the end of a pass it will type out the number of passes 
completed. 

- Inhibit Error Typeout 

At the detection of an error if SU13 is set no error print 
out will occur. If SW13 is off the error information is 
printed as described in section 3.0 error detection. 

- Loop on Test 

At the completion of a test the program checks SW12. If set 
the program will go back to the beginning of that test and 
rerun it. This produces a scope loop on a particular test. 
The program will stay in this test until: 

T. Malt on end of test switch is set 

2 . Loop on test switch is turned off 

At which time the program will go on to the next test. 


If SUl? is set and no test specified (0) the program 
will loop on test 1 . 




NOTE 


sun a 


swio (i 

SW 9 
( 0 ) 

( 1 ) 

SW 8 (1 

SW 0 (1 


To loop on * test that requires a previous test to be 
run first (Section 2.3.4), select the prerequisite 
test and set the "HALT AT END OF TEST" switch. Start 
the program and when it halts, select the desired 
test and set the "LOOP ON TEST" switch. The program 
will now stay in that test. 


) - Lock on Error 

In some tests errors can occur in several places throughout 
the test. When the error has been reported the program sets 
a PC flag to indicate where the error occurred. If SUIT is 
set the program goes back to the beginning of the test 
running, and goes through the test until: 

1. it finds a different error in an earlier part of the test 
in which case it will lock onto that error. 

2. It detects the PC flag indicating this is where the error 
occurred. It then goes back to the beginning of the rest 
aga i n . 

This loop will continue until halt on error switch is set or 
the lock on error switch is turned off. 

) - Halt at End of Test 

When set it will halt the program at the end of the test 
presently running. 

- Limit Data Error Print Outs 

- When off only the first TO data byte errors will be printed 
on a read check test, for each sector. Any more errors will 
be tabulated but not printed. An error on a different sector 
will allow 10 more data byte errors to be printed. 

- When set all data byte errors for all sectors will be printed 
on an error. 

) - Inhibit Recalibration 

No recalibration of the drives will occur upon the detection 
of a seek error if this switch is set. 

) - Inhibit Bell at Error 

If SWO is off the error routine will ring the teleprinter 
bell at each error detected. With SWO set no bell will ring. 


2.5 lest Definitions 
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2.5.1 Pretest - Initialize [Key] Part 1 

Each time the program is started, by either starting address, it runs 
through a pretest. 

Key initialize should set the done flag because any initialization of 
the RX01 microprocessor is an implied [read sector] of track 1 
sector 1. Therefore any error, except parity, that may occur from a 
normal Cread sector] command may occur during an initialize, causing 
the error flag to set. 

Pretest insures that: 

1. Done is set 

2. Error flag is cleared 

3. TR flag is cleared 

4. Init done is set 


2.5.2 Test 1 - RXCS Test Part 1 / Interrupt Test Part I 

The purpose of this test is to verify that writing all RXCS writable 
bits to a 0 are not written to a 1 . 

The program writes the RXCS ■ 0 

No interrupts should occur 

The RXCS should remain unchanged - 40 (done) 

The RXDB should = 0 


2.5.3 Test 2 - Interrupt Test Part II / Vector Address Verification 

The purpose of this test is to verify that writing the RXCS interrupt 
enable bit (bit 6) to a 1 , does indeed write it to a 1, therefore 
because done is set an interrupt should occur (the POP 11 priority is 
0 ) 
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2. 5. A Test 3 - Interrupt Test Part 111 / Priority Level Test Part 1 

The purpose of this test is to verify the priority of the interrupt 
request line. The program sets the PDP-11 priority to A 

An RX01 interrupt should occur on priority level 5 

If no interrupt occurs then the priority level of the R X 1 1 is not 5, 
but maybe levels A, 3. 2. or 1 


2.5.5 Test A - Interrupt Test Part IV / Priority Test Part 11 

The purpose of this test is to verify the priority of the R X 1 1 
interrupt request line. The program sets the PDP-11 priority to 5. 

No interrupt should occur. If an interrupt does occur then the 
priority l«vel of the RX11 is not level 5, but maybe level 6, or 7. 


2.5.6 Test 5 - Init [Programmed] B / Read Status 

The purpose of this test is to verify that setting the RXll bit 1A 
causes a RX01 programmed subsystem initialize. 

The RXCS should = AO (done) 

The RXDB should = A, or 10A, or 20A, or 30A 

Test 5 cont'd - RXCS test part II / RST 

The purpose of this test is to verify the read status command 
(function MM)., and that done bit is cleared by the function. 


2.5.7 Test 6 - fill Buffer Transfer Length Test 

The purpose of this test is to verify the transfer length of the 
function 'fill buffer" of the RX01 microcontroller 


NOTE 

This test loads the sector buffer for 
test 7 and 10, and must be run previous 
to them. 
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2.5.8 Test 7 - Empty Buffer Transfer Length and Content verification 
Part 1 

ihe purpose of this test is to verify the transfer lenoth of the 
function "empty buffer" and to verify the contents of the sector 
but fer . 


2.5.9 Test 10 - Empty Buffer Transfer Length and Content Verification 
Part 11 

The purpose of this test is to verify the previous empty buffer test 
did not empty and destroy the contents of the sector buffer. 


2.5.10 Test 11 - Fill / Empty Buffer yith All 0"s 

During the empty buffer function this lest verifies that all 0’s are 
in fact in the sector buffer. 


2.5.11 Test 12 - Fill t Empty Buffer With All 1's 

During the empty buffer function this test verifies that all 1's are 
in fact in the sector buffer. 


2.5.12 Test 13 - Drive Ready Verification 

Tests that the drive ready (RDT) bit will set for all selected drives. 
The RDT bit will be set after a read status function directed to the 
[the selected drive. 


2.5.13 Test K - Error Flag and B-Code Verification Part 1 

The purpose of this test is to verify that trying to read a 
non-existant sector will cause an error and the correct error code 
will be put into the RXDB when the status B is read. 


NOTE 


This test checks for parity 
read status B function, 
tests (T15 8 T 1 6 ) do not. 
must be run before tests 15 


error on the 
the next two 
This test 
l 16. 
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2.5. K Test 15 - Error Flag and 6-Code Verification Part 11 

This test v»riiies that trying to write deleted data on an illegal 
sector will produce an error and the correct B-code is produced. The 
deleted data bit should be set after this test. 


2.5.15 Test 16 - Error Flag and B-Code Verification Part 111 

Verifies that a write function to a nonexistant sector will produce an 
error and the correct B-code is produced. The deleted data bit will 
also be cleared. 


NOTE 

Test 16 must be run before test 17 as 
test 16 clears the deleted data bit and 
test 17 tests that it is cleared. 


2.5.16 Test 17 - Illegal Track Error Verification 

This test verifies that if a track address larger than IK(octal) is 
accessed, an error condition will occur, and the B-code will =■ 40. It 
also expects the deleted data bit to be cleared. 


2.5.17 Test 20 - Seek Verification via Read Function 

This test does a read function on the selected tracks testing for seek 
errors on various sections of the diskette. 


2.5.18 Test 21 - Write Test 

The purpose of this test is to write all ones on sector 1. track 1. 
and to verify that the data in the sector buffer is not changed. 


NOTE 

This test must be run before tests 
22 K 25 as they check for data written 
on track 1 sector 1 . 
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2.5.19 Test 22 - Initialize Implied Read 

After previously writing data on track 1 sector 1. this test changes 
the contents of the sector buffer and does a programmed initialize. 
At the end of an init. (recal.) the sector buffer must contain the 
data from track 1 sector 1. 


NOTE 

Unit 0 must be on-line for this test to 
work . 


2.5.20 Test 25 - Read Test 

This test verifies that a read function does infact load the sector 
buffer with data read from the selected address. 


2.5.2T Test 24 - Data Transfer and verification 

The purpose of this test is to write then read and check data on all 
sectors of the selected tracks. The test alternates between drives, 
if both drives are selected, before changing tracks. The data pattern 
used is a floating 0 pattern. 


2.5.22 Test 25 - Data Verification via Deleted Data Node. 

This test is the same as Test 24 except it checks for deleted data 
indicators and uses a data pattern of floating 1. 


2.5.23 Test 26 - Head "Home" Test 

This test checks for the "home found before the desired track was 
reached" error code. T he head is moved out 10 tracks then decremented 
back to track 0. It tests all selected drives, and uses a data 
pattern o f random data. 


3.0 ERRORS 
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Pretest and tests 1 - 17. and tests 21 - 23 handle errors as indicated 
in Section 3.1. for the most part these tests do rot rely on an 
interrupt to indicate the function is completed. Whereas the other 
tests Itests 20. and 24 - 26) do read, write and read check functions 
over the selected track, sectors, and drives. These require the 
interrupt service and error detection that was used in the data 
reliability test. This is described in Section 3.3. 


NOTE 

If loop on error switch is up then the 
program will loop on the shortest set of 
instructions that will keep it in the 
failing loop. Otherwise after reporting 
the error the program will continue 
running through the remaining addresses 
and tests. 


3.1 Error Heading For Tests 1 - 17, And 21 - 23 Plus Pretest. 

The error heading is as follows: 

ERADR FAST F APT [BLANK] GOOD BAD 

Under each column the error routine prints pertinent information. 

ERADR = Error address 

Address of the error trap instruction where the error was 
detected. 

FAST = Hrst address of selected test 

Address of the test selected and running 

FAPT = First address of present test 

Address of the test or subtest presently running, or 
address of the scope loop. 

[Blank] 

Additional general information supplied by some tests on 
an error. 

GOOD = Expected results of the test 

Test results of what should have happened if there was no 
error. 

BAD - Actual test results 

The data that was received from the RX01. that caused the 
error. 


PASS - Number of passes made up to this error 
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5.2 Error Output Per Test 

T he following are the types of print outs under the columns 
good, and bad for the various tests, using this errror format 


TEST (SECTION) 

[Blank] 

(R2) 

GOOD 

(RO) 

BAD 

(R1 ) 

PPE TEST 

(1 ) 

N/A 

40 

(RXCS) 

PRETEST 

(2) 

(RXCS) 

INC. .00 BIT 

4 OR 

204 

(RXCS) 

NO DD BIT 

TEST 1 

(1) 

N/A 

40 

(RXCS) 

TEST 1 

(2) 

N/A 

0 

(RXCS) 

TEST 1 

(5) 

(KRXVEC) 

N/A 

N/A 

TEST 2 

(1 ) 

(KRXVEC) 

N/A 

N/A 

TEST 2 

(2) 

(KRXVEC) 

140 

(RXCS) 

TEST 2 

(5) 

(KRXVEC) 

40 

(RXCS) 

TEST 2 

(4) 

(KRXVEC) 

40 

(RXCS) 

TEST 2 

(5) 

(KRXVEC) 

40 

(RXCS) 

TEST 5 

(1) 

(KRXVEC) 

N/A 

N/A 

TEST 4 

(1 ) 

(KRXVEC) 

N/A 

N/A 

TEST 5 

(1) 

N/A 

40 

(RXCS) 

TEST 5 

(2) 

(RXDB) 

INCt.DD BIT 

4 OR 

204 

(RXDB) 

NO DD BIT 

TEST 5 

(3/ 

N/A 

0 

(RXCS) 

TEST 5 

(4’ 

N/A 

40 

(RXCS) 

TEST 5 

(5) 

(RXCS) 

INCL.DD BIT 

200 

(RXCS) 

NO DD BIT 

TEST 6 

(1) 

NO. Of Xf ERS 

N/A 

N/A 

TEST 7 

(1) 

NO. Of Xf ERS 

EXPEC. 

DATA 

ACTUAL 

DATA 


Cbl 3nk ] , 



TEST 11112 (1) [USES TEST 6 t 7 10 FILL / EMPTY BUFFER] 


TEST 

15 

(1 ) 

(RXDB) 

200 

(RXDB) 

NO DD BIT 

TEST 

15 

(2) 

(RXDB) 

200 

(RXDB) 

NO DD BIT 

TEST 

K 

(1) 

NO. OF TR ' S 

1000A0 

(RXCS) 

TEST 

1A 

(2) 

(RXDB) 

0 

(RXDB) 

NO DD BIT 

TEST 

1A 

(5) 

(RXDB) 

AO 

(RXCS) 

TEST 

K 

(A; 

N/A 

70 

(RXDB) 
ERROR CODE 

TEST 

IS 

(1) 

NO. OF TR'S 

1000A0 

(RXCS) 

TEST 

IS 

(2) 

N/A 

100 

(RXDB) 

TEST 

IS 

(3) 

N/A 

70 

(RXDB) 
ERROR CODE 

TEST 

16 

(1 ) 

NO. OF TR'S 

lOOOAO 

(RXCS) 

TEST 

16 

(2) 

N/A 

0 

(RXDB) 

TEST 

16 

(5) 

N/A 

70 

(RXDB) 
ERROR CODE 

TEST 

17 

( 1 A) 

(RXDB) 

0 

(RXCS) 

TEST 

17 

(IB) 

N/A 

1000A0 

(RXCS) 

TEST 

17 

(2) 

N/A 

0 

(RXDB) 

TEST 

17 

(5) 

(RXDB) 

AO 

(RXCS) 

TEST 

17 

(A) 

N/A 

AO 

(RXDB) 
ERROR CODE 

TEST 

21 

(1 ) 

(RXES) 

STATUS A 

NO. OF 
BYTE 

(RXDB) 
STATUS B 


TEST 21 (2) [USES TEST 7 TO EMPTY BUFFER] 

TEST 22 [USES TEST 6 i 7 TO FILL AND EMPTY BUFFER] 

TEST 25 tUSES TEST 6 t 21 TO FILL AND CHECK BUFFER] 
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I 5.3 Error Heading for Tests 20. 24 - 26 

As previously stated these tests access all the selected sectors, 
tracks, and drives, and rely on the interrupt service routine to 
indicate that a function is completed or an error occurred. All 
errors, with the exceptions where noted, will type as its first or 
second line of the message "error conditions test PC = XXXX PASS = x". 
The test PC numoer is the starting address of the test running, and 
the pass number is the number of passes made up to the error. 

On most errors the program will type out the contents of "Status A" 
and "Status 8". 

Status A is the contents of the RXES (error and status register) at 
the time the error was detected. It shows the CRC, PAR, etc. errors. 

Status B is the "definitive error codes" that the RX01 detected, that 
may have caused the error condition. These error codes are defined in 
Section 5.3.4 

There are three categories of errors as listed and described below. 


5.3.1 No Error Flag Errors 

These are errors that can occur but the error flag in the RXCS will 
not be set. 

1. Unexpected or missing deleted data bit 

This error results when the program expects and doesn't see 
the DD bit ("0 0 mark missing"), or doesn't expect and finds 
the deleted data bit set (unexpected 0 D mark"). The 
program will type out at what diskette address this occurred 
then continue testing. 


NOTE 

See Section 3.3.3 for other causes of this error. 


2. Data no status error 

This error occurs during a read check when the data read does 
not match the data in the memory data buffer, and there was 
no CRC error indicated. This means that the data was 
probably read off the diskette correctly but the transfer 
between the sector buffer and the RXD8 in the RX11 produced 
bad data. 


SFQ 0025 
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The error message will include the diskette address, "byte" 
number in the sector, the data read from the sector buffer 
"bad", and the expected data from the memory buffer "good". 

Byte B Bad Good 
(The data patterns are formatted as shown) 

0 (Track address; bits 6-0) 

1 (Unit number bit 7) 

(Sector address bits 4-0) 

Bytes 2 - 125 contain the selected data pattern. 

126 (The sum of all bvtes 0 - 125) 

127 (The negative of 2 times byte 125) 

The program detects a checksum errror by summing all the data 
read from the sector buffer and comparing that sum to 0. 

At the end of the data error tvpeout the program prints if 
the checksum accumulated was good" or "bad". If bytes 0 or 
1 have data errors the operator must check the results of the 
checksum. If it is also bad, then there was a true data 
error. If the checksum was good, then it might be that the 
head is not over the track expected, and there is a 
positioning error. 

If switch 9 is down then only 10 data errors will be printed, 
and at the end of the sector the "total read check errors *" 
will be typed. If switch 9 is up then all the data errors 
for that sector will be typed out. 

3. Power failure 

The program tests for two types of power failure, total 
system power loss, and RX 1 1 power loss resulting in a 

recalibration of the drives. 

The total system power failure is detected by "SYSHAC" 
subroutine ".(POWER . When the power is detected to be going 
down, the registers are saved. When the power comes back up 
the registers are restored and the message "power" is 
printed. The program then restarts. 

Loss of power in the RX11 causes a recalibration of all 
drives. When this happens the "init done" bit is set in the 
RXES register along with the normal done flag At each 

interrupt the program tests for the init done bit. If it is 

found set, the function was not completed and a power loss 

must have been detected. When this happpens the program 
types out "RX11 Power" and restarts. The error heading is 
not typed on this error. 
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Unknown interrupt 

If an interrupt occurs through the RX 1 1 interrupt vector 
address and none of the status bits are set (done, error, 
etc.) the program will type "unknown interrupt" and return 
back to the program to continue the function. The error 
heading is not printed. 

5. No interrupt at done 

The program expects an interrupt at done on the functions of 
these tests. if an interrupt does not occur at done time 
then the program will type out no interrupt at done error" 
then go into the interrupt service routine as if an interrupt 
did occur. At this point other errors may be printed if any 
are detected. 


3.3.2 Error Flag Errors 

These errors are detected as the results of the error bit being set in 
the RXCS at an interrupt. 

1 . Parity error 

A parity error results from an incorrect transfer of a 
command word from the RX 1 1 interface to the RX01 
micro-processor controller. The program will type out the 
contents of the command status register (RXCS) showing the 
function that failed, the address of the error, contents of 
status A (RXES) with the parity bit set. contents of status B 
(RXDB) with the definitive error code of 210 set. Then a 
"read, write, fill buffer or empty buffer parity error" will 
be printed. If a parity error occurs on a "read definitive 
error code" function, then the contents of the RXCS and 
"parity error" will be typed out. 

2. CRC errors 

On all data transfers between the sector buffer and the 
diskette, a CRC word is generated and checked. If an error 
is detected by the micro-processor in this CRC word then a 
CRC error is generated. The proaram again types out the 
contents of the registers (RXCS contains function, status A 
with "CRC ERR" bit set, status B with an error code of 200). 
Then if ft is a read only function, or a read check function 
and there were data errors it will type out "data CRC errors" 
then print the bad bytes if any. If it was a read check 
function and there were no data errors it will print "CRC 
error no data error". 



3. Seek errors 
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Any error that produces a definitive error code but does not 
set an error bit in status A (RXDB at end of function) is 
labeled a seek error. See Section 3.3.4 for error codes and 
iieanings. The sane information is printed for these errors 
as in parity, or CRC errors, except it states that it is a 
"write or read seek error". If switch 8 is down then at each 
seek error found the program does an initialize of the RX01 
so it will recalibrate to a known (home) position. The 
program then goes on to the next sector or track and 
continues testing, if the loop on error switch is off. (See 
Section 3.3.3. for errors caused by previous errors.) If the 
loop on error switch is up it will retry the function at the 
same address. If switch 8 is up then no "initialize" is done 
and the program looks at the other switches for operating 
conditions. Seek errors also print the track address that 
the head moved from at the time of the error. 

4. Error flag error 

If the error flag is not set in the RXCS and an error bit is 
set in status h or an error code is set in status B then 
there was an error but the error flag was not set. The 
message "error flag error" is printed then the program 
continues to type out the type of error. 


3.3.3 Errors Resulting From Previous Errors 

If there is a "write seek error" the program will go on to the next 
address without writing on the address where the error occurred. 
(Unless the loop on error switch 11 is up and the seek error is 
recovered.) If the write function is followed by a read check function 
and the read does not have a seek error at the same address, then 
there may be data errors, or unexpected or missing deleted data bit 
errors resulting from no data being written on that address by the 
previous write function. 


3.3.4 Definitive Error Codes 

The RX01 micro-processor has defined the error codes and meanings 
which are available to the program by issuing command #7 "read 
definitive error code" 

The following are the codes and their meanings: 
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10 - Drive 0 failed to see hone Iron initialize 

20 - Drive 1 failed to see hone iron initialize 

30 - Hone found when stepping out 10 tracks for init. 

40 - Tried to access a track greater then 76 

50 - Hone found before desired track was reached 

60 - Self diagnostic error 

70 - Desired sector not found after sanpling 52 headers 
100 - Write protect error 

110 - More then 40 us and no sep clock detected 

120 - A preanble could not be found 

130 * Preanble found but no ID nark found in tine 

140 - CRC error on a header, no error flag 

150 - Good header (no CRC error) but track compare error 

160 * ID address nark not found in time 

170 * Data nark not found in time 

200 - Data CRC error 

210 - Parity errors 


3.4 Progran Hung 

If there is no response from the RX11 while waiting for the transfer 
request (TR) flag or the done flag, the progran will type "device test 
hung S PC" (only if SWl3 is off) and then go on to the next test, or 
the beginning of the'present test. 


4.0 HALTS 

The only halts in the program are the selectable halts (E0P, EOT, at 
error), the illegal vector halts, and the illegal test selection halt. 


NOTE 

One additional 'halt' exists in the 
program. It occurs when the user has 
loaded his progran via the 'RXDP' 
monitor (on unit 0) and also requires 
testing of unit 0. A prompt message is 
typed reminding the user to replace his 
load medium with a scratch diskette 
before going on. The program will wait 
for the 'continue' switch to be 
depressed. 
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BASIC DEFINITIONS 

TEST SELECTION VIA SWITCH REGISTER 
OPERATIONAL SWITCH REGISTER POSITIONS 
RXCS (RX COMMAND STATUS REGISTER) 

RXDB (RX DATA BUFFER REGISTER) 

START AND RESTART ADDRESSES 

GET VALUE FOR SOFTWARC SWITCH REGISTER 
PRETES.' - INITIALIZE CKEY3 PART I 
TEST 1 - RXCS TEST PART 1 / INTERRUPT TEST PART 1 
TEST 2 - INTERRUPT TEST PART 11 / VECTOR ADDRESS VERIFICATION 

TEST 3 - INTERRUPT TEST PART 111 / PRIORITY LEVEL VERIFICATION PART 1 

TEST 4 - INTERRUPT TEST PART IV / PRIORITY VERIFICATION PART II 

TEST 5 - 1N1T CPR0GRAMMED3 / RST 

TEST 6 - FILL BUFFER TRANSFER LENGTH VERIFICATION 
TEST 10 - EMPTY BUFFER XFER LENGTH AND CONTENT VERIFICATION PART II 
TEST 7 - EMPTY BUFFER XFER LENGTH AND CONTENT VERIFICATION PART 1 
TEST 12 - FILL/EMPTY BUFFER ALL I'S 

TEST 11 - FILL/EMPTY BUFFER ALL O'S 

TEST 13 DRIVE READY VERIFICATION 
TEST 14 - ERROR FLAG AND B-CODE VERIFICATION PART I 

TEST 15 - ERROR FLAG AND B-CODE VERIFICATION PART 11 

TEST 16 - ERROR FLAG AND 8-CODE VERIFICATION PART 111 

TEST 17 - ILLEGAL TRACK ERROR VERIFICATION 

TEST 20 - SEEK VERIFICATION VIA READ FUNCTION 
TEST 21 - WRITE TEST 

TEST 22 - INITIALIZE IMPLIED READ 

TEST 23 - READ TEST 

TEST 24 - DATA TRANSFER AND VERIFICATION 

TEST 25 - DATA TRANSFER AND VERIFICATION VIA DELETED DATA MODE 

TEST 26 - HEAD ’•HOME” TEST 

'• ERROR ** TRAP SERVICE ROUTINE 
” SCOPE " TRAP SERVICE ROUTINE 
DRIVE TEST SELECTION 
WRITE FUNCTION 
READ DATA FROM THE DISKETTE 
READ AND VERIFY DATA 
INTERRUPT SERVICE 
PATTERN GENERATOR 
UNIT SELECTION 
TRACK SEQUENCE SELECTION 
SECTOR SELECTION 
TYPE ROUTINE 

BINARY TO OCTAL (ASCII) AND TYPE 
SAVE AND RESTORE R0-R5 ROUTINES 
TTY INPUT ROUTINE 
TRAP DECODER 
TRAP TABLE 

POWER DOWN AND UP ROUTINES 

SINGLE LENGTH BINARY TO DECIMAL ASC1Z ROUTINE 

DOUBLE LENGTH BINARY TO DECIMAL ASCII CONVERT ROUTINE 

MESSAGES 
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.NllST CND.HD.HC 
•LIST HE 
.ENABL ABS.AHA 


.TITLE CZRXBf 0 RX11 INTERFACE TEST 
; ‘COPYRIGHT (C) HAY 8,1979 
; ‘DIGITAL EQU1PHENT CORP. 

.••HAYNARO. HASS. 01754 
• • 

-•PROGRAH BY D. ADAHS/B. BURGESS/HUE PAGE 
• * 

••THIS PROGRAH WAS ASSEHBlED USING THE PDP-11 HA1NDEC SYSHAC 
.-•PACKAGE (HAINDEC-1 1 -DZQAC-C3) , JAN 19, 1977. 

• • 

0000C1 STN r 1 

160000 SSWR= 160000 ; ; HALT ON ERROR. LOOP ON TEST, INHIBIT ERROR TYPOUT 


.COPYRIGHT (C) 1975,1976 

; THIS SOFTWARE IS FURNISHED UNDER LICENCE FOR USE ONLY 
;0N A SINGLE COHPUTER SYSTEH AND HAY BE COPIED ONLY WITH 
; THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS 
.-SOFTWARE. OR ANY OTHER COPIES THEREOF, rAY NOT BE PROVIDED 
;0R OTHERWISE HADE AVAILABLE TO ANY OTHER PERSON 
; EXCEPT FOR USE ON SUCH SYSTEH, AND TO ONE WHO AGREES TO 
.-THESE LICENCE TERHS. TITLE TO OWNERSHIP OF THE 
; SOFTWARE SHALL AT ALL TIMES REHA1N IN DEC. 

.-THE INFOHAT ION IN THIS DOCUHENT IS SUBJECT TO CHANGE 
.-WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COHHITHENT 
; BY DIGITAL EQUIPHENT CORPORATION. 

.DEC ASSUHES NO RESPONSIBILITY FOR THE USE OR RELIABILITY 
;0F ITS SOFTWARE ON EQUIPHENT WHICH IS NOT SUPPLIED BY DEL. 
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AO 
A i 
A2 
A3 
AA 
AS 
Aft 
A7 
A8 
A9 

50 

51 

52 

53 
5A 

55 

56 

57 

58 

59 

60 
61 
62 
63 
6A 

65 

66 

67 

68 

69 

70 

71 

72 

73 
7A 

75 

76 

77 

78 

79 


MODIFIED TO REV. D BY B. BURGESS NOV. 10, 1975 AS FOLLOWS: 

A) ADDED CAPABILITY OF VARIABLE DEVICE 'BR' LEVEL. ALL RELEVANT TESTS 
CALCULATE ’CPU' LE/EL BASED ON CURRENT CONTENTS OF LOCATION 'BRLEV: * . 
DEFAULT 'BR' LEVEL, FOR THE DEVICE, SET BY THE PROGRAM IS 5. ANY OTHER 
'BR* LEVEL ( E.G. 6 ) WOULD HAVE TO BE PATCHED INTO LOCATION 'BRlEV: * 
BEFORE RUNNING THE PROGRAM. 

B) ADDED TWO (2) ROUTINES TO HANDLE 'UNEXPECTED' BUS TIMEOUT AND 
RESERVED INSTRUCTION TRAPS ( TRAPS TO VECTORS A 8 10. RESPECTIVE) . 
BOTH ROUTINES WILL INDICATE WHICH TRAP OCCURRED, THE 'PC' LOCATION 
OF WHERE THE TRAP OCCURRED, AND ATTEMPT TO RESTART THE PROGRAM. 

C) ADDED CODE TO FAILSAFE UNIT 0 UNDERGOING TESTING IF PROGRAM WAS 
LOADED VIA UNIT 0 USING 'RXDP' MONITOR AND USER STARTED RUNNING 

THE PROGRAM WITHOUT HAVING REPLACED HlS LOAD MEDIUM WITH A 'SCRATCH' 
DISKETTE. 

B) ADDED MESSAGES TO INDICATE TO USER WHEN HE HAS SELECTED TRACK AND/OR 
SECTOR LIMITS 'OUT OF RANGE' AND CORRESPONDING DEFAULT LIMITS WHEN 
THIS CONDITION ARISES 

E) MODIFIED TESTS 1 THRU A TO CORRECTLY PRINT OUT THE CONTENTS Of 
'KRXVEC' ( LOCATION HOLDING THE DEVICE VECTOR) AS 26A INSTEAD OF 27C. 

F) MODIFIED TEST 2 TO HANDLE A 'LOCKED IN INTERRUPT STATE' CONDITION 
ARISING WHEN 'INTERRUPT ENABLE* AND s DONE ' ARE BOTH QUALIFIED AND 
THE 'REQUEST INTERRUPT' FLOP NEVER GETS CLEARED. 

G) ADDED EXTENSIVE MAINTENANCE INFORMATION BASED ON FAULT INSERTION 
RESULTS. INFORMATION IS KEYED TO THE 'ERROR' REPORT WITHIN A 
TEST. INFORMATION PROVIDED SHOULD BE SELF-EXPLANATORY BUT SHOULD 
NOT BE MISCONSTRUED AS BEING ALL ENCOMPASSING DUE TO HUMAN ERRORS 
IN STATISTICS GATHERING. INABILITY TO FAULT INSERT SOME CHIPS. AS 
WELL AS ONLY TWO (2) MODULES ABLE TO BE FAULT INSERTED I.E. - 
M78A6 (UNIBUS INTERFACE) AND H7727 (READ/WRITE CONTROL). 

H) ADDED FLOW CHARTS 
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80 


81 

82 

85 


. SB T T L 

BASIC DEFINITIONS 




.•INITIAL ADDRESS OF THE 

STACK POINTER *•• 1200 ••• 


84 

001200 

STACK- 

1200 



8S 


. EQUI V 

EMT, ERROR 


BASIC DEFINITION OF ERROR 

call 

86 

87 

88 


. EQU1 V 

10T, SCOPE 


BASIC DEFINITION OF SCOPE 

CALL 


.-•MISCELLANEOUS DEFINITIONS 


89 

000011 

HT = 

11 


CODE FOR HORIZONTAL TAB 


90 

000012 

LF = 

12 


CODE FUR LINE FEED 


91 

000015 

CR= 

15 


CODE FOR CARRIAGE RETURN 


92 

000200 

CRLF = 

200 


CODE FOR CARRIAGE RETURN- 

LINE FEED 

93 

177776 

PS- 

177776 


PROCESSOR STATUS WORD 


94 


. EQUI V 

PS.PSW 




95 

177774 

STKLMT= 

177774 


STACK LIMIT REGISTER 


96 

177772 

PI RQ = 

177772 


PROGRAM INTERRUPT REQUEST 

REGISTER 

97 

177570 

DSWR = 

177570 


HARDWARE SWITCH REGISTER 


98 

99 

100 

177570 

DD1SP= 

177570 


HARDWARE DISPLAY REGISTER 



.-•GENERAL PURPOSE REGISTER DEFINITIONS 


101 

000000 

R0= 

*0 


GENERAL REGISTER 


102 

000001 

R1 = 

XI 


GENERAL REGISTER 


103 

000002 

R2= 

X2 


GENERAL REGISTER 


104 

000003 

R3= 

X5 


general register 


105 

000004 

R4 = 

X4 


general register 


106 

000005 

R5 = 

X5 


GENERAL REGISTER 


107 

000006 

R6= 

X6 


GENERAL REGISTER 


108 

000007 

R7= 

X7 


GENERAL register 


109 

000006 

SP= 

X6 


STACK POINTER 


110 

111 

112 

000007 

PC = 

X7 


PROGRAM COUNTER 
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113 

000000 

PRO= 

0 


PRIORITY LEVEL 0 


114 

000040 

PR 1 = 

40 


PRIORITY LEVEL 1 


115 

000100 

PR2= 

100 


priority level 2 


116 

000140 

PR3- 

140 


PRIORITY LEVEL 3 


117 

000200 

PR4 = 

200 


PRIORITY LEVEL 4 


118 

000240 

PR5= 

240 


PRIORITY level 5 


119 

000300 

PR6= 

300 


PRIORITY level 6 


120 

000340 

PR 7 = 

340 


PRIORITY level 7 


121 
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.-•"SWITCH REGISTER” SWITCH DEFINITIONS 


123 

100000 

SW 15- 

100000 



124 

040000 

SW1 4= 

40000 



125 

020000 

SW 1 3 r 

20000 



126 

010000 

SU 1 2- 

10000 



127 

004000 

SW1 1 - 

4000 



128 

C02000 

SWl 0- 

2000 



129 

001000 

SW09= 

1000 



130 

000400 

SW08- 

400 



131 

000200 

SW07 = 

200 



132 

000100 

SW06= 

100 



133 

000040 

SW05- 

40 



134 

000020 

SW04 = 

20 



155 

000010 

SW03-- 

10 
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000004 

SW92 = 

4 

137 

000002 

SW01 = 

2 

138 

000001 

SU00= 

1 

139 


.EQU1V 

SU09.SW9 

HO 


.EQUIV 

SU08.SU8 

HI 


•EQU1V 

SU07.SU7 

142 


.EQUIV 

SU06.SU6 

H3 


.EQUIV 

SU05.SU5 

HA 


.EQUIV 

SU04.SU4 

145 


.EQUIV 

SW03.SW3 

H6 


.EQUIV 

SU02.SW2 

H7 


.EQUIV 

SW01 , SW1 

H8 


.EQUIV 

SWOO.SWO 

H9 




ISO 


; ‘DATA BIT DEFINITION 

151 

100000 

B1 T 1 5= 

100000 

152 

040000 

BI T 14 = 

40000 

153 

020000 

BI T 1 3= 

20000 

154 

010000 

BIT 12- 

10000 

155 

004000 

BIT1 1 = 

4000 

156 

002000 

BIT 10= 

2000 

157 

00 1000 

BIT 09= 

1000 

158 

000400 

B1T08= 

400 

159 

000200 

B1T07= 

200 

160 

000100 

BI T06= 

100 

161 

000040 

BI T05= 

40 

162 

000020 

BIT04= 

20 

163 

000010 

BIT03= 

10 

164 

000004 

BIT 02= 

4 

165 

000002 

BI T01 = 

2 

166 

000001 

BI T00= 

1 

167 


.EQUIV 

BIT 09 , 8 1 T 9 

168 


.EQUIV 

BIT 08 , 8 1 T 8 

169 


.EQUIV 

B1T07.B1T7 

170 


.EQUIV 

B1T06.BIT6 

171 


.EOUlV 

B1T05.BIT5 

172 


.EQUIV 

BIT 04 . B I T 4 

173 


.EQUIV 

B1T03.B1T3 

174 


.EQUIV 

BIT02.B1T2 

175 


.EQUIV 

B 1 T0 1 .BIT 1 

176 


.EQUIV 

BIT 00 , B 1 T 0 

177 




178 


.••BASIC 

"CPU” TRAP VE 

179 

000004 

ERRVEC= 

4 

180 

000010 

RESVEC= 

10 

181 

000014 

TBITvEC 

= 14 

182 

000014 

TRT VEC= 

14 

183 

000014 

BPT VEC= 

14 

184 

000020 

ICTVEC= 

20 

185 

000024 

PWRVEC= 

24 

186 

000030 

EMTVEC= 

30 

187 

000034 

TRAPVEC 

= 54 

188 

000060 

TKVEC= 

60 

189 

000064 

TPVEC= 

64 

190 

000240 

P1RQVEC 

=240 

191 





08:23 


H 3 
PAGE 


SEO 0055 


ADDRESSES 

1 l HE OUT AND OTHER ERRORS 
RESERVED AND ILLEGAL INSTRUCTIONS 
"T" BIT 
TRACE TRAP 

BREAKPOINT TRAP (BPT ) 

INPUT/OUTPUT TRAP HOT) «*SCOPE»* 
POWER FAIL 

EMULATOR TRAP (EMT ) **ERROR*» 

"TRAP" TRAP 

TTY KEYBOARD VECTOR 

TTY PRINTER VECTOR 

PROGRAM INTERRUPT REQUEST VECTOR 


CZRXBFO RXT1 INTERFACE 


CZRXBF . 

P1 1 08-HAY-7' 

T 92 



T 93 



194 



195 



196 



197 


000017 

198 


000040 

199 


000101 

200 


000103 

201 


000105 

202 


000107 

203 


000115 

204 


040001 

205 


OOOOOO 

206 



207 


OOOOOO 

208 

OOOOOO 

OOOOOO 

209 



210 


000004 

211 

000004 

006156 

212 

000006 

000340 

213 

000010 

006202 

214 

000012 

000340 

215 



216 


000020 

217 

000020 

006524 

218 

000022 

000340 

219 

000024 

015160 

220 

000026 

000340 

221 

000030 

006260 

222 

000032 

000340 

223 

000034 

015074 

224 

000036 

000.340 

225 



226 



227 


000042 

228 

000042 

OOOOOO 

229 



230 


000046 

231 

000046 

002470 

232 



233 



234 


000052 

235 

000052 

000100 

236 



237 


000174 

238 

000174 

OOOOOO 

239 

000176 

OOOOOO 

240 



241 



242 


000200 

243 

000200 

000401 

244 

000202 

000402 

245 

000204 

000137 

246 

000210 

000137 

24 7 




TEST MAC Y 1 1 30AC1 
T 4:22 BA SI 


OOOOOO 


001232 It: 

001222 2t : 


2) 29-HAY- 08:25 

DEF IMT10NS 

.•SPECIAL EQUATES 


RDER 

-17 

D0NEB1T 

--40 

FB1E 

= 101 

EBIE 

= 103 

URT1E 

= 105 

RDIE 

= 107 

UTDDIE 

-115 

RECAL 

=40001 

OPEN 

=0 

.=0 

.WORD 0.0 

• : A 
.WORD 

BUSERR 

.WORD 

PR7 

.WORD 

RESERR 

.WORD 

PR 7 

.=20 

XSCOPE 

PR7 

IPURDN 

PR7 

XERROR 

PR7 

STRAP 

PR7 


.=42 

.WORD 

0 


.=46 

LOGICAL 


.=52 
.WORD 0 

. = 174 

OISPREG: 0 

SUREG: 0 


.=200 

BR It 
BR 2t 

JHP SA200 
JHP SA202 


I 5 
PAGE t 


SEQ 005a 


; READ B CODE 

; IE *F ILL BUFFER 
; IE*EHPTY BUFFER 
; IE 4 UR I T E SECTOR 
; I E ♦ RE AD SECTOR 
; I E ♦ WR I T E DD SECTOR 


UNEXPECTED TIMEOUT TRAP PC 
UNEXPECTED TIMEOUT TRAP PS 
UNEXPECTED RESERVED INSTRUCTION TRAP PC 
UNEXPECTED RESERVED INSTRUCTION TRAP PS 


.ADDRESS OF TRAP SERVICE 


;ACT IT EOP HOOKS 


.•OPERATOR SELECTED CONDITIONS 

.•RESTART PROGRAM WITH PREVIOUS PARAMETERS 


CZRXBFO uni INTERFACE TEST 
CZRXBF.P11 06-RAY -79 T4-.22 


1 


J 3 

RAC Y 1 1 30A( 1052) 29-RAY-79 08:23 PAGE 7 

BASIC DEFINITIONS SEO 0035 

248 

249 


CZRXBFO RX11 INTERFACE TEST 
CZRXBf.PTl 08-HAY-79 14:22 


X 3 

HAC Y 1 1 S0AU052) 29-NAY-79 08:23 PAGE 8 

TEST SELECTION VIA SU1TCH REGISTER 


SEQ 0036 


250 

251 

252 

253 

25 ^, 

255 

256 

257 

258 

259 

260 
261 
262 

263 

264 

265 

266 

267 

268 

269 

270 

271 

272 

273 

274 

275 

276 

277 

278 

279 

280 
281 
282 

283 

284 

285 

286 

287 

288 

289 

290 

291 

292 

293 

294 

295 


.SBTTL TEST SELECTION VIA SWITCH REGISTER 


; SET TEST AND DRIVE SELECTION IN ** DTESTP “ LOCATION 1212 

■ BIT 15 = 1 - UNIT 1 SELECTED 

; BIT 14 = 1 - UNIT 0 SELECTED 

; BIT 15 I BIT 14 = 0 - BOTH DRIVES MUST BE READY 

; BIT 4 - BIT 0 = OCTAL NUMBER OF DESIRED STARTING TEST 

; BIT 4 - BIT 0=0 -ALL TESTS WILL BE SEQUENCED THROUGH 


.SBTTL OPERATIONAL SWITCH REGISTER POSITIONS 


; SET OPERATING CONDITIONS IN THE SWITCH REGISTER (HARDWARE) 
; OR SOFTWARE SWITCH REGISTER LOCATION 176 

; 15=1— HALT ON ERROR 

; 14 - 1 — HALT AT END OF PASS 

; 13 = 1 - INHIBIT ERROR TYPEOUT 

; 12 = 1 - LOOP ON TEST 

; 11—1— LOCK ON ERROR 
; 10 = 1 - HALT AT END Of TEST 
; 9=1- PRINT ALL DATA ERRORS 

; 9=0- PRINT ONLY FIRST 10 DATA ERRORS PER SECTOR 

; 8=1- INHIBIT RECALIBRATION ON SEEK ERRORS. 

; 0=1- INHIBIT <BELL> AT ERROR 

; 15-0 = 1 - SELECT SOFTWARE SWITCH REGISTER 



CZRXBFO RX'.T INTERFACE TEST 
CZRXBF.P1 I 08-MAY-79 14:2? 


MACYT1 30A ( 1 052 ) 29-MAY-79 08:23 L PAGE 9 

RXCS (RX COMMAND STATUS REGISTER) 


SEQ 0037 


296 

297 

298 

299 

300 

301 

302 

303 

304 

305 

306 

307 

308 

309 

310 

311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 

323 

324 

325 

326 

327 

328 

329 

330 

331 

332 

333 

334 


.SBTTL RXCS (RX COMMAND STATUS REGISTER) 



001200 


. =ST ACK 

001200 

000000 

OD: 

0 


001201 

1D=0D* 1 


001202 

015001 

FIRST: 

015001 


001203 

LAST=FIRST+1 

001204 

000264 

KRXVEC: 

264 

001206 

177170 

RXCS: 

177170 



; RXCS: 

STANDARD DEVICE ADDRESS 



; TOGGLE 

INTO PROGRAM LOCATION 



.KEY: R 

- READ ONLY BIT 



; u 

- WRITE ONLY BIT 


; OD / I D = 0 UNLESS SPECIFIC TRACKS SELECTED. 
; FIRST = 1. LAST = 32 


335 

; 3 2 

1 

0 




336 







337 

■ - - 

- 

GO 




338 







339 

; 0 

4 

GO 

- 

FILL BUFFER 


340 

; 2 

4 

GO 

- 

EMPTY BUFFER 


341 

; 4 

4 

GO 

- 

WRITE SECTOR 


342 

6 

4 

GO 

- 

READ SECTOR 


343 

- 






344 

; 12 

4 

GO 

- 

READ STATUS " 

A " 

345 

; 14 

4 

GO 

m 

WRITE DELETED 

DATA 

346 

; 16 

4 

GO 

m 

READ STATUS ” 

B " 


RXCS ” THE RX 1 1 DEVICE ADDRESS It NOT = 177170 


- ERROR 

- INITIALIZE 


(BITS 13-8) 
(NOT USED) 


15 - R 

14 - U 

13 - 
12 - 
11 - 
10 - 
9 - 
8 - 

7 - R - TRANSFER REQUEST 

6 - R/U- INTERRUPT ENABLE 

5 - R - DONE 

4 - U - UNIT SELECT 

3 - W - FUNCTION 

2 - U - FUNCTION 

1 - W - FUNCTION 

0 - U - GO ! 


FUNCTION 


(CODES) 


N 3 

CZRXBFO RX11 INTERFACE TEST MACYll 30A(1052> 29-MAY-79 08:23 PAGE 10 

CZRXBF.P11 08-MAY-79 14:22 RXDB (RX DATA BUFFER REGISTER) SEQ 0058 


347 

348 

349 

350 

351 

352 

353 

354 

355 

356 

357 

358 

359 

360 

361 

362 

363 

364 

365 

366 

367 

368 

369 

370 

371 

372 

373 

374 

375 

376 

377 

378 

379 

380 

381 

382 

383 

384 

385 

386 

387 

388 

389 

390 

391 

392 

393 

394 

395 

396 

397 

398 


001210 


001212 

001214 


001216 

001220 


177172 


000000 

000005 


177570 

177570 


.SBTTL RXDB (RX DATA BUFFER REGISTER) 


RXDB: 177172 

; RXDB: STANDARD DEVICE ADRESS = 177172 

; THE FOLLOWING eiT IDENTIFICATION REPRESENTS THE STATUS AT THE END OF A FUNCTION 
; (BUT NOT FUNCTION # 16 TO READ STATUS M B ’*) DISPLAYED WITHIN THE RX-DATA BUFFER. 


; (A) 7 - SELECTED DRIVE READY 

6 - DELETED DATA 
5 - 

• 4 - 

; 3 - WRITE PROTECT ERROR 

(B) 2 - INITIALIZE DONE 

; 1 - PARITY ERROR 

; 0 - CRC ERROR 

; (A) - VISIBLE ONLY IF THE FUNCTION WAS # 12 READ STATUS " A ” 

; (B) - INI T DONE VISIBLE IF AN IN1TIZLIAE [KEY] OR [PROGRAMMED] WAS ISSUED 
DTESTP: 0 
BRLEV : 5 

;BRLEV: STANDARD PRIORITY INTERRUPT LEVEL = 5 

; TOGGLE INTO PROGRAM LOCATION "BRlEV* THE RX11 INTFRRUPT PRIORITY 
; LEVEL IF NOT = 5 


SWR : .WORD DSWR 

DISPLAY: .WORD DD1SP 


RO - GOOD /EXPECTED RESULT OF TEST 
R1 - EAC /ACTUAL RESULT OF TEST 

R2 - BLANK / 

R3 - TEST Q 


WORD "UN1TSEL" HAS THE FOLLOWING BIT OEF F INI T IONS 

BIT15 = 1 - UNIT 1 SELECTED FOR USE 

BIT14 = 1 - UNIT 1 IN USE 

B1T8 = 1 - THIS PASS HAD AN ERROR 

BIT7 = 1 - UNIT 0 SELECTED FOR USE 

B1T6 = 1 - UNIT 0 IN USE 

B1T4 = UNIT SELECTION BIT 


r • 


CZRXBFO 

RX11 INTERFACE 

TEST 

HACY11 

N 3 

30AU052) 29-HAY-79 08:23 PAGE 

11 



T 

CZRXBF . 

P11 08-HAY -79 

14:22 


START 

ANO RESTART ADDRESSES 




SEQ 0019 

399 

400 

401 

402 

403 






.SBTTL START AND RESTART 

ADDRESSES 






; THE 

STARTING ADDRESS WAS 20 2 





001222 

005200 



SA202: 

INC RO 





404 

001224 

012706 

001200 



HOV ISTACK.SP 





405 

406 

407 

408 

409 

001230 

000447 




BR RESTART 









; THE 

STARTING ADDRESS UAS 200 





001232 

005000 



SA200: 

CLR RO 





410 

001234 

012737 

177570 

001216 


HOV #1 77570 , SUR 



RESET TO HARDWARE SUR. 


411 

001242 

012706 

001200 



HOV # STACK. SP 





412 

001246 

104401 

016746 



TYPE .hrev 



PRINT THE NAHE AND REVISION 

SAVE 'BUSERR* TIHEOUT ‘PC' 


413 

001252 

013746 

000004 



HOV 4,-(SP) 




414 

001256 

012737 

001276 

000004 


HOV #1$,4 



SET UP TIHEOUT VECTOR 


415 

001264 

022777 

177777 

177724 


CHP #177777, 9SWR 



IS SOFTWARE SWR SELECTED 

YES, INSERT IT'S ADDRESS 


416 

001272 

001402 




BEQ 2$ 




417 

001274 

000423 




BR 3$ 



BR IF NO TIHEOUT TRAP OCCURS 


418 

001276 

022626 



IS: 

CHP ISP)*,(SP)* 



RESTORE THE STACK 


419 

001300 

012737 

000176 

001216 

2S: 

HOV #SWREG.SWR 



POINT TO SOFTWARE SWITCH REGISTER 


420 

001306 

012737 

000174 

001220 


HOV IDISPREG. DISPLAY 



POINT TO SOFTWARE DISPLAY REG. 


421 





.SBTTL 

GET VALUE FOR SOFTWARE SWITCH 

REGISTER 


4 22 

001314 

005737 

000042 



T ST 3142 

; ; ARE 

WE 

RUNNING UNDER XXDP/ACT? 


423 

001320 

001006 




BNE 64$ 

; .'BRANCH 

IF YES 


424 

001322 

023727 

001216 

000176 


CHP SWR.ISWREG 

; ; SOFTWARE SWITCH REG SELECTED? 


425 

001330 

001005 




BNE 65$ 

; ;BRANCH 

IF NO 


426 

001332 

104405 




GTSWR 

; ;GET 

SOFT-SWR SETTINGS 


427 

001334 

000403 




BR 65$ 





428 

001336 

112737 

000001 

015072 

64S: 

HOVB #1 .SAUTOB 

; : SET 

AUTO-HODE INDICATOR 


429 

001344 




65$: 




RESET TIHEOUT VECTOR TO 'BUSERR 1 


430 

001344 

012637 

000004 


3$ : 

HOV <SP>*,4 




431 

001350 

000005 



RESTART :RESET 



INITIALIZE THE RX11 SYSTEH 


432 

001352 

012746 

000340 



HOV #PR7.-(SP) 





433 

001356 

012746 

001364 



HOV #4$,-(SP) 





434 

001362 

000002 




RT1 



LOAD THE PSW 


435 

001364 

013737 

001206 

001210 

4$: 

HOV RXCS, RXDB 



GET ADDRESS OF RXCS 


436 

001372 

062737 

000002 

001210 


ADD #2, RXDB 



SET UP ADDRESS OF RXDB 


437 

001400 

012737 

001234 

012654 


HOV #001234, RANI 



INITIALIZE CONSTANTS OF 


438 

001406 

012737 

000765 

012656 


HOV #000765, RAN2 



RANDOH NUHBER GENERATOR 


439 

001414 

005037 

002554 



CLR C COUNT 





440 

001420 

005037 

002556 



CLR PASS 





441 

001424 

005037 

007004 



CLR HANGER 





442 

001430 

012737 

177740 

007006 


HOV #1 77740. HANGPL 





443 

001436 

005700 




T ST RO 



STARTING ADDRESS WAS 202 


444 

001440 

001064 




BNE XSA202 




445 

001442 

005037 

012752 



CLR UN1TSEL 



WERE ANY DRIVES SELECTED 


446 

001446 

032737 

140000 

001212 


BIT #140000, DTESTP 




447 

001454 

001004 




BNE 1$ 



YES GO SET THEIR BITS 


448 

001456 

052737 

100200 

012752 


BIS #100200, UNITSEL 



NO. BOTH UNITS HUST BE READY 


449 

001464 

000415 




BR 2$ 



WAS UNIT 0 SELECTED 


450 

001466 

032737 

040000 

001212 

1$: 

BIT #B1T14. DTESTP 




451 

001474 

001443 




BEQ 3$ 



NO, HUST BE UNIT 1 


452 

001476 

052737 

000200 

012752 


BIS #200, UNITSEL 



YES. SET SELECTED BIT 


453 

001504 

005737 

001212 



TST DTESTP 



WAS UNIT 1 SELECTED 


454 

001510 

100003 




BPL 2$ 



NO 



CZRXBFO R X 1 1 INTERFACE TEST 
CZRXBF.P1T 08-NAY-79 14:22 


SEO 0040 


B A 

NACY11 30AC 1052) 29-NAY-79 08:23 PAGE 12 

GET VALUE FOR SOFTWARE SWITCH REGISTER 


<.55 

001512 

052737 

1 00000 

012752 

BIS #BIT15.UN1TSEL 


YES. SET THE SELECTED BIT 

456 

001520 

005737 

000042 


2S : TST a«42 


AUTO NODE? 

<.57 

001524 

001432 



BEQ XSA202 


BRANCH IF NOT 

458 

001526 

023737 

000042 

000046 

chp a*42,a#46 


ACT NODE ? 

459 

001534 

001007 



BNE 6S 


BRANCH IF NOT 

460 

001536 

012777 

000176 

177452 

NOV #SWREG,aSWR 


GET SOFT SWITCH REG FOR AUTO NODE 

461 

001544 

052777 

100000 

177444 

BIS #BlT15.aSWR 


SET FOR HALT ON ERROR 

462 

001552 

000417 



BR XSA202 



463 

001554 

132737 

000010 

000041 

6V: 81TB #10.a#41 

; WAS PROG. LOADED FRON RX01 ? 

464 

001562 

001413 



BEQ XSA202 


BRANCH IF NOT 

465 

001564 

042737 

000200 

012752 

B1C #200,UN1TSEL 



466 

001572 

104401 

016235 


TYPE .NUN1T1 



467 

001576 

104401 

016245 


TYPE .NONLY 



468 

001602 

000403 



BR XSA202 



469 

001604 

052737 

100000 

012752 

3t: BIS #B1T15,UN1TSEL 



470 

001612 

042737 

100200 

001200 

XSA202: B1C #100200,00 


-CLEAR 1ST TINE BITS FOR BOTH DRIVES 

471 

001620 

104401 

015656 


TYPE. NDTESTP 



472 

001624 

013746 

001212 


NOV DTESTP.-(SP) 

; ; SAVE OTESTP FOR TYPEOUT 

473 

001630 

104403 



TYPOS 

; ; GO TYPE— OCTAL ASCII 

474 

001632 

006 



.BYTE 6 

; ; TYPE 6 

DIGIT (S) 

475 

001633 

000 



.BYTE 0 

.-.SUPPRESS LEADING ZEROS 

476 

001634 

104401 

016162 


TYPE .HCRLF 



477 

001640 

005737 

001200 


UNITS: TST 00 



478 

001644 

001005 



BNE TRKLNT 



479 

001646 

005037 

013164 


CLR sequen 



480 

001652 

104401 

016461 


TYPE .NL1NTRK 



481 

001656 

000432 



BR SECLNT 



482 








483 





; 0 <= 00 <= 10 <= 114 



484 








485 

001660 

123727 

001201 

000114 

TRKLNT : CNPB 10. #114 



486 

001666 

101021 



BHI 1$ 



487 

001670 

123737 

001200 

001201 

CNPB 00, ID 



488 

001676 

101015 



BHI It 



489 

001700 

104401 

016507 


TYPE .NOD 



490 

001704 

113746 

001200 


NOVB 00 ,-CSP) 



491 

001710 

104403 



TYPOS 



492 

001712 

003 



•BYTE 3 



493 

001713 

000 



•BYTE 0 



494 

001714 

104401 

016513 


TYPE ,NID 



495 

001720 

113746 

001201 


NOVB 1D,-(SP) 



496 

001724 

104403 



TYPOS 



497 

001726 

003 



.BYTE 3 



498 

001727 

000 



.BYTE 0 



499 

001730 

000405 



BR SECLNT 


; TYPE NSG. INDICATING 10 OR 00 

500 

001732 

104401 

017126 


1$: TYPE, 0D2B1G 


501 




; TOO BIG fc DEFAULTING TO TRACKS 

502 







;0, 52, 53. 114 

503 

001736 

005037 

001200 


CLR 00 



504 

505 

506 

507 

508 

001742 

000736 



BR LlNITS 







; 1 <= FIRST <= LAST <= 32 



001744 

105737 

001202 


SECLNT: TSTB FIRST 



509 

001750 

001003 



BNE It 



510 

001752 

112737 

000001 

001202 

NOVB #1. FIRST 




CZRXBFO 
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GET 

VALUE FOR SOFTWARE SWITCH REGISTER 

511 

001760 

123727 

001203 

000032 

IS: 

CHPB LAST. *32 

512 

001766 

101023 




BHl 2S 

513 

001770 

123737 

001202 

001203 


CMPB FIRST. LAST 

5K 

001776 

101017 




BHl 2S 

515 

002000 

104401 

016521 


3S: 

TYPE .MF1RST 

516 

002004 

113746 

001202 



NOVB FIRST. -CSP) 

517 

002010 

104403 




TYPOS 

518 

00c012 

003 




.BYTE 3 

519 

002013 

000 




.BYTE 0 

520 

002014 

104401 

016532 



TYPE .NLAST 

521 

002020 

113746 

001203 



NOVB LAST. -ISP) 

522 

002024 

104403 




TYPOS 

523 

002026 

003 




.BYTE 3 

524 

002027 

000 




.BYTE 0 

525 

002030 

104401 

016162 



TYPE .NCRLF 

526 

002034 

000406 




BR PRETEST 

527 

002036 

104401 

017213 


2S: 

TYPE. S2B1G 

528 







529 







530 

002042 

012737 

015001 

001202 


MOV *15001. FIRST 

531 

002050 

000753 




BR 3S 


TYPE MSG. INDICATING THAT 
SECTOR RANGE SELECTED UAS 
INVALID AND DEFAULTING TO A 
1ST SECTOR VALUE OF 1 AND 
A LAST SECTOR VALUE OF 32 


CZRXBFO RX11 INTERFACE TEST 
CZRXBF.P11 08-MAY-79 14:22 


SEQ 0042 


532 

533 

534 

535 

536 

537 

538 

539 

540 

541 

542 

543 

544 

545 

546 


0 4 

MACY11 30A( 1052) 29-AAY-79 08:23 PAGE 14 

PRETEST - INITIALIZE [KEY] PART I 

.SBTTL PRETEST - INITIALIZE [KEY] PART I 

"KEY" INITIALIZE SHOULD HAVE [SET] THE DONE FLAG BECAUSE 
ANY [1N1U OF THE RX01 HI CROCONTROLLER IS AN IMPLIED [READ SECTOR] 

OF TRACK 1 SECTOR 1 (FOR SYSTEMS PROGRAMMING BOOTSTRAP APPLICATIONS) 

THEREFORE . ANY ERROR (EXCEPT PARITY) THAT MAY OCCUR FROM A NORMAL 
"READ SECTOR" COMMAND MAY OCCUR HERE CAUSING THE ERROR FLAG TO SET. 
DISPLAYING THE ERROR STATUS UITHJN THE TRANSFER REGISTER AT "DONE". 

THE TRANSFER REQUEST FLAG SHOULD BE CLEARED. 

NOTE: SCOPE LOOPING IS NOT OFFERED BECAUSE THE "1N1T" FUNCTION 
WHICH PRODUCED THE ERROR HAS NOT YET BEEN VERIFIED. 


547 

002052 

042737 

000400 

012752 

PRETEST: B1C IB1T8.UN1TSEL 


548 

002060 

005037 

006520 


CLR ERRORS 


549 

002064 

000004 



SCOPE 

; REFRESHES FAST FOR ERROR TYPEOUT 

550 

002066 

013737 

006604 

002560 

MOV PCSCOPE .FAST 

; FOR ERROR TYPEOUT INFORMATION 

551 

002074 

012700 

000040 


MOV #40. RO 

: PROGRAM EXPECTS DONE FLAG 

552 

002100 

017701 

177102 


3S: MOV a RXCS, R1 

; ACTUAL CONTENTS OF RXCS 

553 

002104 

020100 



CMP R1 , RO 


554 

002106 

001407 



BEQ IS 

; OK 

555 

002110 

062737 

000001 

007004 

ADD #1, HANGER 

; WAI T FOR THE IN1T. FUNCTION TO 

556 

002116 

005537 

007006 


ADC HANGPL 

[FINISH BEFORE CALLING IT AN ERROR 

557 

558 

559 

560 

561 

002122 

001366 



BNE 3S 






; (RO) = 40 ; (R1) = ACTUAL RXCS ; (R2) ■ 

= N/A 

002124 

104000 



ERROR 

; RXCS NOT - 40 (DONE) 


562 




; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
.-THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
.•BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR HE RELEVANT FAULT/S. 

•IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
.ANALYZE THE FOLLOWING AREA/S: 

M7846 (UNIBUS INTERFACE) 

SIGNAL NAME REASON POSSIBLE CHIPS 


NOTE: MAKE SURE THE DRIVES ARE CONNECTED CORECTLY.THE 

DISKETTES INSERTED, AND THE DOORS OF THE SELECTED DRIVES 
ARE CLOSED. IF THE THESE CONDITIONS ARE NOT SET THERE 
WILL BE AN ERROR AT THIS POINT. 


AND 


;B TRANSFER REQUEST 


STUCK HIGH 


E22 


CZRXBFO RXll INTERFACE TEST 
CZRXBF.P11 08-NAY-79 14:22 


SEO 0045 


E 4 
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DONE 

STUCK LOW 

E22.E3b.E1 

RUN (0) H 

STUCK LOW 

E 22 

SELECT 00 

STUCK LOW 

E18.E34.E17,E40.E11 

B DONE 

STUCK LOW 

E18.E15.E19.E41 

RUN( 1 ) H 

STUCK HIGH 

E18 

RX 1 N IT 

STUCK HIGH 

E32 

OUT 

S1UCK HIGH 

E23.E4 

B INI T 

STUCK HIGH 

E36.E8 

BUS -> RXCS 

STUCK high/low 

E56.E40 

BUS 1NTR 

STUCK HIGH 

E 38 

BUS D02/D04 

STUCK LOW 

E 38 

RUN(1) H 

STUCK LOW 

E 37 

INT ENB(l) H 

STUCK LOW 

E 37 

TRANSFER REQUEST 

STUCK HIGH 

El 

INT EN6(T) H 

STUCK HIGH 

El 


STROBE DISABLED 

El 


’A’ INPUTS NOT SELECTED 

El 

CND 

STUCK LOW 

E17.E21 

B DONE 

STUCK HIGH 

E15 

RUN(O) H 

STUCK HIGH 

E 1 5 

OUT 

STUCK LOW 

E 24 

PX INI T 

STUCK LOW 

E 2 1 .Ell 

IN 

STUCK HIGH 

E21 

RX RUN 

STUCK LOW 

E 14 


LOCKED IN ’PRESET 1 STATE 

E 2 


NO STROBE SIGNAL 

E 3 

3US D 1 5 

STUCK LOW 

E9 

DATA 

STUCK HIGH 

Ell 


; I F THE FAULT CANNOT BE FOUND ON THE UNIBUS INTEP'ACE NODULE 
.-AND/OR THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE NODULE 
.-N7846 THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/WRITE 
.NODULE N 7727. 

NOTE: ONLY APPROX. 301 OF THIS NODULE LENT ITSELF CONDUCIVE TO 

THE FAULT INSERTION PROCESS; ERGO. THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS NODULE IS NOT VERY HIGH. 
HOWEVER, ANALYSIS OF THE FOLLOWING AREA/S. IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS, SHOULD AT 
LEAST PLACE YOU WITHIN THE RELEVANT AREA ON THE NODULE. 

N7727 (READ/WRITE CONTROL) 


SIGNAL nane 

REASON 

POSSIBLE CHIPS 



PIN 15 NOT AT GROUND 

STUCK LOW 

STUCK LOW 

STUCK LOW 

STUCK LOW 

STUCK HIGH 

E 18 CLOCK LOCKED HIGH/LOW 
REPLACE E 18 

S T UCK LOW 

PIN 14 NOT «5v THRU Ik 

cu 

SEL TRK 
DkO TRk 
S cL DKO 
DC LO 
OUT 

oo 

Z 1 J 

E 1 5 
£15 

E 1 3 

E 1 3 

E 1 3 

E14.E18 



INI T 


E18.E16 

E 16 


F 4 
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• ' J ,K ' INPUTS TO E 1 8 LOCKED E17 

HIGH/ LOW 

; ' J ' INPUT TO E16 LOCKED HIGH E 1 7 

;/: W: W: W: W: W:W: W: W:W: W: W: W:W: W: W: W:W:\* 

W: W:\* 


652 

653 

654 

655 

656 

657 

658 

659 

660 
661 
662 

663 

664 

665 

666 

667 

668 

669 

670 

671 

672 

673 

674 

675 

676 

677 

678 

679 

680 
681 
68 2 
683 


002126 012737 177740 

002134 012700 000204 

002140 017702 177044 

002144 010201 

002146 042701 000100 

002152 105737 012752 

002156 100404 

002160 042701 000200 

002164 042700 000200 
002170 020100 
002172 001544 


002174 104000 


007006 


/////////////////////////////////////////////////////////////////////////////// 
STATUS A [RXDB3 AT "DONE” 

7 6 - - 3 2 1 0 / 


SEL 

DRIVE DD 
RDY 


WRITE INI T PAR CRC 
PROTECT [DONE] 

(N/A) 


t 

/ 

/ 


/////////////////////////////////////////////////////////////////////////////// 


IS: HOV #1 77740, HANGPL 

NOV #204, RO 
NOV 3RXDB.R2 
NOV R2,R1 
BIC IB1T6.R1 
TSTB UNITSEL 
BN1 2S 
BIC #BIT7,R1 
BIC #BIT7,R0 
2S : CNP R1 , RO 

BEQ REBEGIN 


.RESET HANG COUNTER 

.EXPECT INIT DONE AND UNIT 0 RDY 


.-CLEAR DELETED DATA BIT 
; WAS UNIT 0 SELECTED 

; UNI T 0 WAS NOT SELECTED 
.CLEAR THE DRIVE 0 RDY BITS 


(RO) = 4 IF UNIT 0 IS NOT SELECTED. OR 204 IF UNIT 0 IS SELECTED 
(R1 ) = ACTUAL RXDB NINUS DELETED DATA BIT#6 
(R2) - ACTUAL RXDB 

ERROR ; RXDB NOT =4. OR 204 




THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
THIS ERROR REPORT WAS GENERATED. THE INFORNAT ION SHOWN IS 
BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES Of ERRORS 
ANALYZE THE FOLLOWING AREA/S: 


H7846 (UNIBUS INTERFACE) 
SIGNAL NAHE 


REASON 


POSSIBLE CHIPS 


CZRXBFO RX11 1 NT ERF ACt TEST 
CZRXBF.P11 08-NAY-79 14:22 


SEQ 00^ 
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; NOTE: 

MAKE SURE THE DRIVES ARE CONNECTED CORECTLY.ThE 


DISKETTES INSERTED. AND THE DOORS OF 

THE SELECTED DRIVES 


ARE CLOSED. IF THE THESE CONDITIONS 
WILL BE AN ERROR AT THIS POINT. 

ARE NOT SET THERE 

B SHIFT 

STUCK LOW/HIGH 

E15.E19.E2 

B DONE 

STUCK HIGH 

E15 

TO RX01 

STUCK LOU/HlGH 

E 1 5 

LOAD 

STUCK HIGH 

E17.E18 

SELECT 00 

STUCK HIGH 

E17.E18 

SELECT 02 

STUCK LOU 

E17.E18.E34 

IN 

STUCK LOU 

E17.E21 

CND 

STUCK LOU/HlGH 

E 2 1 

BUS D 1 5 

STUCK HIGH 

E40 

RX 1N1T 

STUCK HIGH 

E 32 

BUS DOO -> D03 

STUCK HIGH 

E41.E7 

DATA 

STUCK LOU 

E18.E11 


INCORRECT SHIFT OUTPUTS 
CAN’T SELECT ’B’ INPUTS 

E5 


El 


CAN'T RESET 

E5 

B INI T 

STUCK LOU 

E34.E8 

RX BUSY 

STUCK LOU 

E34.E22.E19 

B DONE 

STUCK LOU 

E 19 

BUS D05 

STUCK LOU 

E4 

B SER DATA 

STUCK LOU/HlGH 

E9 

INT ENBC 1 ) H 

STUCK HIGH 

E 37 

;IF THE 

FAULT CANNOT BE FOUND ON THE UNIBUS 

INTERFACE NODULE 

; AND/OR 

THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE NODULE 

.-N7846 

THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/UR1TE 

.-NODULE 

N 7727. 


NOTE: 

ONLY APPROX. 30X OF THIS NODULE LENT ITSELF CONDUCIVE TO 
THE FAULT INSERTION PROCESS; ERGO. THE RESOLUTION FOR FAUL 
ANALYSIS OBTAINABLE BY THIS NODULE IS NOT VERY HIGH. 
HOWEVER. ANALYSIS OF THE FOLLOWING AREA/S. IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS. SHOULD AT 

; LEAST PLACE YOU UPHlN THE RELEVANT 

• N7727 (READ/UR1TE CONTROL) 

AREA ON THE NODULE. 

SIGNAL 

NANE REASON 

POSSIBLE CHIPS 

SEL UT PROT 

STUCK LOU 

E4.E6.E15 

/: W: \*/:W: 

W:W:W:W:W:W:W:W:W: 

W :W : W: W: W:\* 

/ : \ • / : \*/ : \*/ : 

W:\*/:W:W:W:W:W:W:W: 

W:W:W:W: W:\* 

/ : \ • / : W : \ */ : 

W : W : W:W:W:W:W:W:W: 

W: W:\«/ : W : W :\* 


755 002176 000 5*2 

754 002200 004757 002604 

755 002204 005725 


BR REBEGIN 

NORETESTS: JSR PC. LOCKUP 
TONOTHERE: TST CR 5) ♦ 


; AD J US 1 R5 TOR NEXl TEST ADDRESS 


1 


H 4 
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756 002206 016557 002252 006604 

757 002214 015757 006604 002560 

758 002222 012706 001200 

759 002226 000175 002252 

760 002252 002204 002646 002766 

761 002240 005510 005446 005612 

762 002246 004056 004170 

765 002252 004166 004254 004244 

764 002260 004520 004444 004656 

7 6** 002266 004776 005244 

766 002272 005510 005554 005720 

767 002500 005776 006044 006076 

768 002506 006110 002512 

769 

770 

771 

772 
775 

774 

775 

776 

777 

778 

779 

780 

781 

782 
785 

784 

785 

786 

787 

788 

789 

790 

791 

792 
795 

794 

795 

796 

797 

798 

799 

800 
801 
802 
805 

804 

805 

806 

807 

808 

809 

810 
811 


F1RSTTEST: MOV TE$T$(R5>, PCSCOPE ; EQUIVALENT TO *’ SCOPE " 

NOV PCSCOPE. FAST ;SAvE THE FIRST ADDRESS OF THE TEST 

NOV ISTACK.SP 
JHP 8TESTS(R5> 

TESTS: TONOTHERE. T1. T2. T5. T4. T5, T6. T7 
T 10. Til. T12. T15. T 1 4 , T15, T 16. T17 

T 20 , T21. T22 , T25. T24, T25, T26. NOMORETESTS 

; TEST 1 - RXCS TEST PART I / INTERRUPT TEST PART 1 

; TEST 2 - INTERRUPT TEST PART II / VECTOR ADDRESS VERIFICATION 

; • TEST 5 - INTERRUPT TEST PART 111 / PRIORITY LEVEL VERIFICATION PART 1 

; * TEST 4 - INTERRUPT TEST PART IV / PRIORITY VERIFICATION PART II 

; TEST 5 - INI T [PROGRAMED] / RST 

; TEST 6 - FILL BUFFER TRANSFER LENGTH VERIFICATION 

; TEST 7 - EMPTY BUFFER TRANSFER LENGTH AND CONTENT VERIFICATION PART I 
; TEST 10 - EMPTY BUFFER TRANSFER LENGTH AND CONTENT VET : F 1 CAT ION PART li 
; TEST 11 - FILL/EMPTY BUFFER ALL O'S 

; TEST 12 - FlLL/EMPTY BUFFER ALL 1’S 

; TEST 15 - DRIVE READY VERIFICATION FOR SELECTED DRIVES 

; TEST 14 - ERROR FLAG AND B - CODE VERIFICATION PART 1 

• TEST 15 - ERROR FLAG AND B - CODE VERIFICATION PART II 

; /DELETED DATA BIT SETS 

.-TEST 16 - ERROR FLAG AND B - CODE VERIFICAT’ON PART ill 
; /DELETED DATA BIT CLEARS 

; TEST 17 - ILLEGAL TRACK ERROR AND B - CODE VERIFICATION 
; TEST 20 - SEEK VERIFICATION VIA READ FUNCTION 
; TEST 21 - WRITE TEST 
; T E S T 22 - INITIALIZE IHPlIFD READ 
; TEST 23 - READ TEST 

; TEST 24 - DATA TRANSFER l VERIFICATION 


SEQ 0046 


CZRXBFO RX11 INTERFACE TEST 
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.•TEST 2S - DATA TRANSFER & VERIFICATION VIA DELETED DATA NODE 
;UST 26 - HEAD ••HONE" TEST 

; there are no more tests 

; * NOTE: ON PROCESSORS WITHOUT HARDWARE PROCESSOR STATUS WORDS (PSW) 
; THESE TEST WILL NOT BE RUN. 


SEQ OOA 7 


CZRXBFO 

RX11 INTERFACE 

TEST 

PACT 1 1 

J 4 

30AL1052) 29-HAY-79 08:23 PAGE 

20 

CZRXBF . 

P11 1 

D8-HAY-79 

14:22 


PRETEST 

- INITIALIZE [KEY] PART I 


820 





.•PRINT 

AN END Of PASS INDICATOR 


821 








822 





; C - RX11/RX01 TEST PASS OK 


823 





; D - RX11/RX01 AND DRIVE TESTING 

OK 

824 





; - - AN ERROR OCCURRED (DURING C 

OR 

823 








826 





; NOTE: 

If BIT 8 Of UN1TSEL IS A 

1 

827 





; THEN 

AN ERROR HAS OCCURRED FOR 

THIS 

828 








829 

002312 

042777 

000100 

176666 

NOHORETESTS: B1C #BIT6,aRXCS 

830 

002320 

005037 

007004 



CLR hanger 


831 

002324 

032737 

000400 

012752 


BIT fBITS.UNITSEL 


832 

002332 

001403 




BED IS 


833 

002334 

012737 

000055 

002562 


MOV MX 


834 

002342 

005737 

002554 


IS: 

TST CCOUNT 


835 

002346 

001002 




BNE 3S 


836 

002350 

104401 

016162 



TYPE. MCRLf 


837 

002354 

005237 

002554 


3$: 

INC CCOUNT 


838 

002360 

022737 

000110 

002554 


CMP *72.. CCOUNT 


839 

002366 

001002 




BNE 4S 


840 

002370 

005037 

002554 



CLR CCOUNT 


841 

002374 

104401 

002562 


4$: 

TYPE. MX 


842 

002400 

104401 

006516 



TYPE .HABELL 


843 

002404 

005237 

002556 


2S : 

INC PASS 


844 

002410 

102775 




BVS 2S 


845 

002412 

104406 




CKSWR 


846 

002414 

032777 

040000 

176574 


BIT ISU14.9SUR 


847 

002422 

001413 




BEQ 6S 


848 

002424 

104401 

016162 



TYPE .MCRLf 


849 

002430 

104401 

006753 



TYPE .MPASS 


850 

C02434 

013737 

002556 

002446 


MOV PASS.5S 


851 

002442 

004537 

015642 



JSR R5.SGLDEC 


*352 

002446 

000000 



5S : 

OPEN 


853 

002450 

000000 




halt 


854 

002452 

005237 

007004 


6S : 

INC HANGER 


855 

002456 

001375 




BNE 6S 


856 

002460 

013705 

000042 



HOV i#42.R5 


857 

002464 

001405 




BEQ HERE 


858 

002466 

000005 




RESET 


859 

002470 

004715 



logical 

: JSR PC , (R5) 


860 

002472 

000240 




NOP 


861 

002474 

000240 




NOP 


862 

002476 

000240 




NOP 


863 

002500 

000137 

002504 


HERE: 

JMP REBEGIN 


864 






: B1C IB1T8.DN1TSEL 


865 

002504 

042737 

000400 

012752 

REBEGIN 


866 

002512 

013703 

001212 



MOV DTESTP, R3 


867 

002516 

042703 

1 77740 



BIC #177740. R3 


868 

002522 

020327 

000027 



CMP R3.I27 


869 

002526 

103006 




BH1S IS 


870 

002530 

006303 




ASL R3 


871 

002532 

032 777 

000040 

176446 

2$: 

BIT #40.aRXCS 


872 

002540 

001774 




BEQ 2S 


873 

002542 

000621 




BR F1RSMEST 


874 








875 

002544 

104401 

002564 


IS: 

TYPE .MIlTST 



S£Q 0048 


>) 

PASS 

.-CLEAR 'IE' BIT BEFORE NEXT PASS 
; .‘C“ 0R HEANS errorless PASS. 
; ” - '* MEANS UN-ERRORlESS PASS 


; AC SU U ■- I TO HALT AT END OF PASS 


; UA 1 T FOR EOP INDICATOR TO BE PRINTED 
.ACT T 1 tND OF PASS HOOKS 


.•CLEAR HARD ERROR INDICATOR 
; R3 CONTAINS TEST f 0 TO 26 


CZRXBFO RX11 1HTERF ACE TEST NACY 
CZRXBF .PI 1 08-HAY-79 14:22 

876 002550 000157 001232 

877 

878 002554 000000 

879 002556 000000 

880 002560 000000 

881 

882 002562 000105 

883 

884 002 56 A 046111 042514 040507 

885 0C2572 020114 042524 052125 

886 002600 005015 000 

887 

888 002604 

889 


K 4 
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JHP SA200 

C COUNT : 0 
PASS: 0 

FAST: 0 

MX: . ASCI Z “C" 

HllTST: . ASC 1 Z ‘'ILLEGAL TEST‘‘<1 5><1 2> 


.EVEN 


SEQ 0049 
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CZRXBFO RXll INTERFACE TEST MACYll 30A11052) 29-NAY-79 08:23 PAGE 22 

CZRXBF.PT1 08-HAY-79 14:22 PRETEST - INITIALIZE [KEY] PART 1 

890 ; DATA SU 10 = 1 TO HALT AT END OF TEST 

891 

892 002604 104406 LOCKUP: CKSWR 

893 002606 032777 002000 176402 BIT ISUlO.aSUR 

894 002614 001401 BEQ IS 

895 002616 000000 HALT 

896 

897 ; DATA SU 12 = 1 TO LOCK SCOPE LOOP ON TEST OK OR NOT 

898 


899 

900 

901 

902 

002620 

002626 

002630 

002634 

032777 

001403 

062716 

000207 

010000 

000002 

176370 

IS: 

BIT «SUl2,iSwR 

BEQ 2S 

ADD «2,aSP 

RTS PC 

; IS LOOP ON TEST SWITCH SET 
; 1 F NOT SET GO ON TO NEXT TEST 
; I F SET RETURN TO F 1RST TEST 

903 

904 

002636 

002644 

042737 

000207 

040100 

012752 

2S : 

BIC #40100, UNI T SEL 

RTS PC 

.•CLEAR UNIT USED PITS 



CZRXBFO RX11 INTERFACE TEST 
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m A 
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905 

906 

907 

908 

909 

910 

911 

912 

913 
91A 

915 

916 

917 


918 

0026A6 

005077 

17633A 

919 

002652 

012700 

OOOOAO 

920 

002656 

017701 

17632A 

921 

002662 

020001 


922 

00266A 

001A01 


923 




92A 




925 




926 

002666 

10A000 



927 


.SBTTL TEST 1 - RXCS TEST PART I / INTERRUPT TEST PART I 

; THE PURPOSE OF THIS TEST IS TO VERIFY THAT WRITING ALL RXCS WRITABLE BITS TO A 0 
; ARE [NOT 3 WRITTEN TO A 1 

; THE PROGRAM WRITES THE RXCS = 0 

; NO INTERRUPTS SHOULD OCCUR 

.THE RXCS SHOULD REMAIN UNCHANGED = AO (DONE) 

; THE RXDB SHOULD = 0 

T 1 : CLR 9 RXCS ; WRITING RXCS TO 0, ALSO WRITES RXDB = 0 

MOV IAO, RO 
MOV a RXCS. R1 
CMP RO, R1 
BEQ IS 

; (RO) = AO ; (R1) = ACTUAL RXCS ; (R2) = N/A 

ERROR ; RXCS NOT - AO (DONE) 





; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
.-THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
;BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
REAS TO CHECK FOR THE RELEVANT FAULT/S. 

F THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
NALYZE THE FOLLOWING AREA/S: 


M78A6 (UNIBUS INTERFACE) 
SIGNAL NAME 


REASON 


POSSIBLE CHIPS 


BUS D06 STUCK HIGH EA 

CAN’T SEND DATA EA1 

B TRANSFER REQUEST STUCK HIGH E15 

RX INI T STUCK LOW E36.E11 

BUS D15 STUCK LOW E1A 

D00(1) H STUCK HIGH E22 

RX RUN STUCK LOW E18 

BUS DOO STUCK LOW E 7 


/:\*/:W:W:\*/:W:W:W:W:W:W:W:W:W:W:W:W.W:\* 
✓ : W: W: W : W : W : W : W : W : W : W : W : W : W : W : W : W : W : \* 
/: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W:\* 


958 002670 10AA13 

959 

960 


IS: 


SUBSCOPE 




971 

972 


973 

002672 

005000 

CLR RO 


974 

002674 

017701 176310 

MOV 9 RXDB. R1 


975 

002700 

020100 

CMP R1 , RO 


976 

977 

978 

979 

002702 

001401 

BEQ 31 

; (RO) = 0 ; (R1) = ACTUAL RXDB ; 

(R2) = N/A 

980 

981 

002704 

104000 

ERROR 

; RXDB NOT 




; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; T H 1 S ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

•IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
.•ANALYZE THE FOLLOWING AREA/S: 

M7846 (UNIBUS INTERFACE) 


SIGNAL NAME 


REASON 


POSSIBLE CHIPS 


BUS DOI -> D03 
LOAD 


IN 

RX BUSY 
OUT 

BUS D00/D02/D03 
BUS -> RXCS 
REG SELECT 
B DONE 


STUCK HIGH 
STUCK LOW 
NO SACK 

CLOCK STUCK HIGH/LOW 
STUCK LOW/HIGH 
STUCK HIGH 
STUCK LOW 
STUCK HIGH 
STUCK LOW 
STUCK HIGH 
STUCK HIGH 

•82’ INPUT STUCK HIGH 


E7 

E17.E18 

E 1 2 

El 2 

E21 

E22 

E22 

E4 

E40 

E23 

E19 

El 


/: W: W: W: W: W: W: W: W: W: W : W: W: W: W: W: W: W:\» 
/: W:\*/: W: W: W: W: W: W : W : W : W : W : W : W : W : W : W : \* 
/: W: W: W: W: W: W: W: \*/: W: W: W: W: W; W: W: W: \*/:\* 

31: 


1016 0027C6 104413 


SUBSCOPE 


CZRXBFO RXll INTERFACE TEST 
CZRXBF .PIT 08-MAY-79 14:22 


SEQ 0053 


B 5 

MACY11 30A ( T 052 > 29-MAY-79 08:23 PAGE 25 

TEST 1 - RXCS TEST PART 1 / INTERRUPT TEST PART 1 

NO INTERRUPTS SHOULD OCCUR 


1017 




; INTERRUPT 

TEST PART I ; 

1018 






1019 

002710 

013702 

001204 

NOV 

KRXVEC, R2 

1020 

002714 

010246 


MOV 

R2,-(SP> 

1021 






1022 

002716 

012722 

002756 

MOV 

#41, (R2H 

1023 

002722 

012722 

000340 

MOV 

#PR7, (R2) ♦ 

1024 

002726 

012602 


MOV 

(SPM.R2 

1025 






1026 

002730 

005046 


CLR 

-(SP) 

1027 

002732 

012746 

002740 

MOV 

#2t,-(SP) 

1028 

002736 

000002 


RT1 


1029 

002740 

000240 


2S : NOP 


1030 

002742 

000240 


NOP 

#PR7,-(SP> 

1031 

002744 

012746 

000340 

MOV 

1032 

002750 

012746 

002760 

MOV 

#54. -(SP) 

1033 

002754 

000002 


RT1 


1034 






1035 




; RETURN TO 

HERE WITH pdp 

1036 






1037 






1038 




; (RO) = N/A ; (R1) = N/A 

1039 






1040 

002756 

104000 


4$: ERROR 

1041 







SAVE INTERRUPT VECTOR FOR 
ERROR REPORT 
RX01 VECTOR ADDRESS 

RESTORE INTERRUPT VECTOR FOR 
ERROR REPORT 
PD P PRIORITY <0N> 


RESET P DP PRIORITY <7> OFF 


; UNEXPECTED RX01 INTERRUPT 


; / *\: / *\: / *\: / *\: / *\: / *\: / / *\: / /*\: / /*\: / *\: / *\: / 

; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

; IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
.•ANALYZE THE FOLLOWING AREA/S: 

in78A6 (UNIBUS INTERFACE) 

; SIGNAL NAME REASON POSSIBLE CHIPS 

; I NT ENB STUCK HIGH E36 

• / ; W: \*/ : \*/ :W:W:\*/:W:W:W:W:W: W'-W:W:W:W : \*/:\* 
*;/: \*/: W: \*/: W: W: W: W: W: W: W :\*/ : : \*7 : ; 


1065 002760 OOOOOA 5S: SCOPE 

1066 002762 000137 00A27A JHP CEXIT 


; END OF TEST 1 


C 5 
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CZRXBf .PIT 08-NAY-79 K:22 TEST 2 - IH T ERRUPT TEST PART II / VECTOR ADDRESS VERIFICATION SEQ 0054 


1067 

1068 

1069 

1070 

1071 

1072 


1073 

002766 

013702 

001204 

1074 

002772 

010246 


1075 




1076 

002774 

012722 

003044 

1077 

003000 

012722 

000340 

1078 

003004 

012602 


1079 




1080 

003006 

005046 


1081 

003010 

012746 

003016 

1082 

003014 

000002 


1083 

003016 

052777 

000100 176162 

1084 

003024 

000240 



1085 


. SBTTL TEST 2 - INTERRUPT TEST PART 11 / VECTOR ADDRESS VERIFICATION 


; THE PURPOSE OF THIS TCST IS TO VERIFY THAT WRITING THE RXCS INTERRUPT ENABLE BIT 
; (BIT 6) ■ 1 DOES INDEED WRITE IT TO A 1 , THEREFORE BECAUSE DONE - 1 
; AN INTERRUPT SHOULD OCCUR (THE PDP PRIORITY IS 0 ) 


T 2 : NOV KRXVEC , R2 

NOV R2,-(SP) 

NOV «1S, (R2) ♦ 

NOV 0PR7, (R2)+ 
NOV (SPJ+.R2 

CLR -<SP) 

NOV *6S,-(SP) 

RTI 

t % : BIS JBIT6, 8 RXCS 

NOP 


SAVE INTERRUPT VECTOR FOR 
ERROR REPORT 
RX01 VECTOR ADDRESS 

RESTORE INTERRUPT VECTOR FOR 
ERROR REPORT 
PDP PRIORITY <0N> 


; SET RX01 INTERRUPT ENABLE 




; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; THIS ERROR REPORT WAS GENERATED. THE 1NF0RNAT ION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 


; 1 F THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 

*7846 (UNIBUS INTERFACE) 


SIGNAL nahe 

REASON 


POSSIBLE CHIPS 


SACK FLOP LOCKED CLEAR 


E13.E31 ,E36 


BBSY FLOP CLOCK LOCKED 

HIGH 

E13.E31.E36.E33 

BUS REQUEST 

STUCK HIGH 


E 31 

BUS INTR 

STUCK HIGH 


E31.E35.E8.E38 


SACK FLOP CLOCK LOCKED 

HIGH 

E31.E21.E9.E12 


SACK FLOP CLOCK LOCKED 

LOW 

E31.E21 


BBSY FLOP CLOCK LOCKED 

LOW 

E31.E33.E9 

BUS D02/D04/D05 

STUCK HIGH 


E 38 

BUS SACK 

STUCK HIGH 


E 52 

BG OUT 

STUCK HIGH 


E32.E25.E28 

BUS REQUEST 

STUCK LOW 

JUMPER (N1 ) NOT IN 


E 59 

PUS D07 

STUCK HIGH 


E35.E8 

GRANT FLOP CAN'T BE PRESET 

E25.E9.E28 

B SER DATA 

STUCK LOW 


E9 


GRANT FLOP 'Q' OUTPUT 


E28 


STUCK HIGH 


/:W:\*/:W:W:W:W:\*/V.*/:W:W:W:W:\»/:W.W:W:\» / :\* 
/:W:W:W:W:W:W:W:W:W:W:W:W:W:W.W:W:W:\» 
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CZRXBFO RX11 INTERFACE TEST MACYH 30At 1052) 29-MAY-79 08:23 PAGE 27 

CZRXBF.P11 08-MAY-79 14:22 TEST 2 - INTERRUPT TEST PART 11 / VECTOR ADDRESS VERIFICATION SEO 0055 


;/: W: W: W: W: W: W: W: W: W: W: W: W: \*/: \*/: W: W: W:\« 


1125 

003026 

000240 


1126 

003030 

012746 

000340 

1127 

003034 

012746 

003042 

1128 

1129 

1130 

1131 

003040 

000002 


1132 

1133 

003042 

104000 



NOP 

NOV IPR7.-(SP) 

NOV #7S,-(SP) 

RT1 

; (RO) = N/A ; <R1) = N/A ; (R2) 

7S : ERROR 


; RESET PDP PRIORITY <7> OFF 

N/A 

; NO RX01 INTERRUPT OCCURRED 






/*v • /. 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
.-THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
.'AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

•IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 

M7846 (UNI BUS INTERFACE) 


SIGNAL NAME 

REASON 

POSSIBLE CHIPS 


BBSY FLOP LOCKED IN 'RESET* 

E40.E39.E31 


INT EN8 FLOP CLOCK LOCKED HIGH 

E40 


INT ENB FLOP CLOCK LOCKED LOW 

E40.E37 

RX INI T 

STUCK HIGH 

E36 

BUS REQUEST 

STUCK HIGH 

E36.E39.E32 


LOCKED IN INTERRUPT STATE 

E36.E39 

BG OUT 

STUCK HIGH 

E 33 

INT ENB(1) H 

STUCK LOW 

E37.E1 ,E4 


GRANT FLOP 'Q' OUTPUT 

E28 


STUCK LOW 


TRANSFER REQUEST 

STUCK LOW 

E4 

BUS 1NTR 

STUCK LOW 

E38 


/:\*/:\*/:\*/:W:\*/:\*/:W:\*/:\*/:\*/:\*/:\*/:\*/: \»/:\*/:\*/: \ »/:\* 
/: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: \»/:\* 


1168 

1169 

1170 

1171 

1172 

1173 
1 1 74 

1175 

1176 

1177 

1178 


003044, 005737 003060 


00 3050 001004, 

003052 105237 003060 

003056 000402 


; RETURN TO HERE WITH THE POP PRIORITY - 7 IF AN RX01 INTERRUPT 


IS: TST CATERR 


BNE DEATH 

INCB CATERR 

BR 


DID MORE THAN ONE INTERRUPT 
OCCUR DUE TO BOTH 'DONE* S 'IE' 
BITS SET BUT ’ RQST 1NTR* FLOP 
NEVER GETTING CLEARED? 

RBAMTH IF yF •: 

OTHERWISE. SET FLAG TO INDICATE 
ONE INTERRUPT OCCURRED l GO ON 


OK2GO 


CZRXBFO RX11 INTERFACE TEST 
CZRXBF.P11 08-NAY-79 14:Z 2 


NACYll 30A11052) 29-NAY-79 08:23 PAGE ?8 

TEST 2 - INTERRUPT TEST PART II / VECTOR ADDRESS VERIFICATION 


SEQ OOS6 


IT 79 
1180 
1181 
1182 
1183 
118 A 
1 T 85 
1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 
1 19A 

1 195 

1196 

1197 

1198 

1199 

1200 
1201 
1202 
1203 
120A 


003060 000000 


003062 000000 


00306A 10AA13 

003066 005037 003060 


003072 012700 0001A0 
003076 020077 17610A 

003102 001A03 
0031 OA 017701 176076 


003110 10A000 


CATERR: .WORD 0 


DEATH: 


0K2G0: 


SUBSCOPE 
CLR CATERR 


THIS IS THE INTERRUPT INDICATOR. 
1ST TINE THRU THIS TEST THE IN- 
DICATOR SHOULD ALWAYS BE ZERO; 

IF NON-ZERO A MULTIPLE OF 
INTERRUPTS HAS OCCURRED DUE TO 
THE AFOREMENTIONED CONDITION 
NO SENSE GOING ON - YOU ARE 
LOCKED IN THE INTERRUPT STATE! 
PRESS THE ' CONT * SW1TH (IF 
PRESENT) TO GO ON AT YOUR OWN 
RISK 

EVERYTHING APPEARS TO BE OK 
CLEAR INTERRUPT INDICATOR FOR 
NEXT POSSIBLE PASS THRU THIS TEST 


; THE RXCS SHOULD = 1 AO (INTERRUPT ENABlE+DONE) 

NOV 1140, RO 
cmp ro, a RXCS 
BEQ 2$ 

NOV a RXCS, R1 

; (RO) = 1 AO ; (R1) = ACTUAL RXCS ; (R2) = N/A 


ERROR 


; THE RXCS NOT 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
;BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

; IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 


H78A6 (UNIBUS INTERFACE) 


SIGNAL NAME 


REASON 


POSSIBLE CHIPS 


BUS DOT 
BUS D06 


STUCK HIGH 
STUCK HIGH 


/:W:W:W:W:W:W:W:W:W:W:W:\*/:W:W:W:W:W:\* 
✓ :W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:\» 
/:W:W:\*/:W:W:W:W: W:W:W:W:W:\*/:\*/:W:W:W:\* 


1229 003112 104413 

1230 


21 : SUBSCOPE 


; TEST 2 - CONT’D 

; THE PURPOSE OF THIS TEST IS TO VERIFY THAT BIT 6 OF THE RXCS (INTERRUPT ENABLE) 


CZRXBFO R X 1 1 INTERFACE TEST 
CZRXBF.P11 08-NAY-79 14:22 


F 5 
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TEST 2 - INTERRUPT TEST PART II / VECTOR ADDRESS VERIFICATION 


SEQ 0057 


123S 

1256 

1257 

1258 

1259 

1240 

1 241 

1242 
1 245 

1244 

1 245 

1 246 

1247 

1 248 

1249 

1250 

1251 

1252 
1255 

1254 

1255 

1256 

1257 

1258 

1259 

1260 
1261 
1262 
1265 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 


I 


CAN BE CLEARED AFTER IT UAS KNOWN TO BE SET 


005114 

005120 


015702 

010246 


001204 


NOV KRXVEC. R2 
NOV R2 ,-(SP) 


005122 

005126 

005152 


012722 

012722 

012602 


005212 

000540 


NOV 041, ( R2 ) ♦ 
NOV 0PR7, (R2>* 
NOV ( SP ) ♦ ,R2 


.SAVE INTERRUPT VECTOR FOR 
; ERROR REPORT 
; RX 1 1 VECTOR ADDRESS 


005154 042777 000100 176044 


005142 

005146 

005152 

005154 


012700 

020077 

001405 

017701 


000040 

176034 


176026 


003160 

003162 


104000 

104413 


003164 

003166 

003172 

003174 

003176 

003200 

003204 

003210 


005046 

012746 

000002 

000240 

000240 

012746 

012746 

000002 


003174 


000340 

003214 


B1C 0B1T6, a RXCS 
THE RXCS SHOULD = 40 (DONE) 


.•RESTORE INTERRUPT VECTOR FOR 
.ERROR REPORT 

; CLEAR THE RX 1 1 INTERRUPT ENABLE BIT 


NOV 040, RO 
CNP RO. a RXCS 
BEQ 3$ 

NOV a RXCS, R1 


(RO) = 40 ; ( R 1 ) = ACTUAL RXCS 


ERROR 

3S : SUBSCOPE 

; NO RX 1 1 INTERRUPTS SHOULD OCCUR C YET 3 


(R2) = N/A 

; RXCS NOT = 40 


10 $: 


CLR -(SP) 

NOV 010$. -(SP) 

RTI 

NOP 

NOP 

NOV 0PR7.-(SP) 
NOV 011$, -(SP) 
RTI 


PDP PRIORITY <0N> 


PDP PR I ORL I T Y <0F F > 7 


RETURN TO HERE WITH THE PDP PRIORITY - 7 IF AN UNEXPECTED RX11 INTERRUPT 

while clearing the rxii interrupt enable bit 6 


(RO) = N/A ; (R1 ) = N/A ; (R2) = N/A 


1273 

003212 

104000 


4$: 

ERROR 

; UNEXPECTED RX 1 1 INTERRUPT 

1274 

003214 

104413 


11$: 

SUBSCOPE 


1275 








1276 




; AN 

RX 1 1 INTERRUPT SHOULD OCCUR [NOW] 


1277 








1278 

003216 

013702 

001204 


NOV 

KRXVEC, R2 


1279 

003222 

010246 



NOV 

R2,-(SP) 

.-SAVE INTERRUPT VECTOR FOR 

1280 







.ERROR REPORT 

1281 

005224 

012722 

003274 


NOV 

05$, (R2 ) ♦ 

; R X 1 1 VECTOR ADDRESS 

1282 

003230 

012722 

000340 


NOV 

0PR7, ( R2 ) ♦ 


1285 

003234 

012602 



NOV 

( SP ) ♦ ,R2 

.•RESTORE INTERRUPT VECTOR FOR 

1284 







.•ERROR REPORT 

1285 

003236 

005046 



CLR 

-(SP) 

; PDP PRIORITY <0N> 

1286 

003240 

012746 

003246 


NOV 

012$. -(SP) 


1287 

003244 

000002 



RTI 



1288 

003246 

052777 

000100 

175752 12$: 

BIS 

0BIT6, a RXCS 

; SET RX 1 1 INTERRUPT ENABLE BIT 

1289 

003254 

000240 



NOP 



1290 

005256 

000240 



NOP 




CZRXBF 0 RX11 INTERFACE TEST 
CZRXBF. P11 08-HAY-79 14:2 2 


HACYll 30A0052) 29-HAY-79 08:23 PAGE 30 

TEST 2 * INTERRUPT TEST PART 11 / VECTOR ADDRESS VERIFICATION 


SEQ 00S8 


1291 003260 01 2746 000340 

1292 003264 012746 003272 

1293 003270 000002 

1294 

1295 

1296 

1297 003272 104000 

1298 

1299 

1300 

1301 003274 000004 

1302 003276 042777 000100 175702 

1303 

1304 003304 000137 004274 


HO V #PR7 ,-(SP> 
HOV #13S,-ISP) 
RT1 


( R 1 > = N/A ; (R2) - N/A 


ERROR 


NO RX11 INTERRUPT OCCURRED 


RETURN TO HERE WITH THE POP PRIORITY = 7 IF AN RX01 INTERRUPT 


SCOPE 

B1C #B1T6, 3 RXCS 
JHP CEX1T 


; CLEAR THE RX11 INTERRUPT ENABLE 
; END OF TEST 2 


CZRXBFO RX11 INTERFACE TEST 
CZRXBF.PT1 08-MAY-79 14:22 

1 305 
1506 
T 307 
1308 
T 309 
13T0 
1 31 1 
T 51 2 

1313 

1314 

1315 

1316 

1317 003310 0050C1 

1318 

1319 

1320 003312 013702 001204 

1321 003316 010246 

1322 

1323 003320 012722 005432 

1324 003324 012722 000340 

1325 003330 012602 

1326 

1327 003332 013746 000004 

1328 003336 0T2737 003354 

1329 003344 012737 000200 

1330 003352 000404 

1331 003354 022626 

1332 003356 012637 000004 

1333 003362 000427 

1334 003364 012637 000004 

1335 003370 004737 006226 

1336 

1337 

1338 003374 010046 

1339 003376 012746 003404 

1 340 003402 000002 

1341 003404 

1342 003404 052777 000100 

1343 003412 00024C 

1344 003414 000240 

1345 003416 013746 000340 

1346 003422 012746 003430 

1347 003426 000002 

1348 003430 

1349 

1350 

1351 

1352 003450 104000 

1353 
1554 

1355 

1356 

1357 

1358 

1359 003432 000004 

1360 003434 042777 000100 


M 5 

MAC V 1 1 30A ( 1052) 29-MAY-79 08:23 PAGE ?1 

TEST 3 - INTERRUPT TEST PART II! / PRIORITY LEVEL VERIFICATION PART 1 SEO 0059 

. SB T T L TEST 3 - INTERRUPT TEST PART III / PRIORITY LEVEL VERIFICATION PART I 

; THE PURPOSE OF THIS TEST IS TO VERIFY THE PRIORITY OF THE RX11 INTERRUPT REQUEST l!N£ 

; ThE PROGRAM SETS THE POP PRIORITY TO 1 LESS THAN THE DEVICE LEVEL 
; (DEVICE LEVEL SPECIFIED B* CONTENTS OF LOCATION ’BRLEV:* — NORMALLY 5) 

; AN RX01 INTERRUPT SHOULD OCCUR 

; IF NO INTERRUPT OCCURS THEN THE PRIORITY LEVEL OF THE RX11 IS [NOT] r NORMAL 
; DEVICE LEVEL OF 5 OR THE DEVICE LEVEL AS SPECIFIED BY THE CONTENTS OF 
.LOCATION 'BRLEV: 1 WHICH MAY HAVE BEEN CHANGED BY THE USER BEFORE PROGRAM 
; EXECUTION, BUT MAYBE SOME VALUE LESS THAN THE CONTENTS OF LOCATION 'BRlEV:'. 

; NOTE: IF THERE IS NO HARDWARE •'PSW'* THIS TEST WILL BE SKIPPED. 


000004 

177776 


175574 


T 3 : 

CLR 

R1 


MOV 

KRXVEC, R2 


MOV 

R2,-(SP) 


MOV 

«1S, (R2 ) ♦ 


MOV 

#PR7. (R2) ♦ 


MOV 

(SP) ♦ ,R2 


MOV 

4,-(SP) 


MOV 

#21,4 


MOV 

0PR4.PSW 


BR 

3S 

2S : 

CMP 

( SP) ♦ . (SP) ♦ 


MOV 

(SP) ♦ .4 


BR 

4$ 

3S: 

MOV 

(SP) ♦ ,4 


JSR 

PC.CPUPR1 


MOV 

RO.-(SP) 

64S : 

MOV 

RTI 

#64S,-( SP) 


BIS 

NOP 

NOP 

IBIT6, 9 RXCS 


MOV 

PR7.-(SP) 

65S: 

MOV 

RTI 

#65S.-(SP) 

; (RO) 

- N/A ; (R1 ) ^ N/A ; (R2) 


ERROR 


.•INDICATOR TO CPU PRIORITY 
.ROUTINE TO DROP CPU PRIORITY 
; TO 1 LESS THAN DEVICE LEVEL 

.SAVE INTERRUPT VECTOR FOR 
; ERROR REPORT 
; RX01 VECTOR ADDRESS 

.RESTORE INTERRUPT VECTOR FOR 
.•ERROR REPORT 

;SAVE 'BUSERR’ TIMEOUT 'PC' 

; SET TIMEOUT VECTOR 
;SET LEVEL TO 4 IF 'PSW' EXISTS 
;G0 TO RESET VECTOR 4 t DO TEST 
.•CORRECT STACK FROM BUS TIMEOUT 
;RESTORE TIMEOUT VECTOR TO 'BUSERR* 
;N0 HARDWARE PSW - SKIP THIS TEST 
; RE SET TIMEOUT VECTOR TO 'BUSERR' 
.•CALCULATE PRIORITY LEVEL OF CPU 
.’BASED ON CURRENT DEVICE PRIORITY 
;LEVEL RESIDING IN LOC. 'BRlEV' 

PUT NEW PS ON STACK 
PUT NEW PC ON STACK 
POP NEW PC AND PS 

; SET THE RX01 INTERRUPT ENABLE 


PUT NEW PS ON STACK 
PUT NEW PC ON STACK 
POP NEW PC AND PS 


= N/A 


PRIORITY LEVEL IS NOT - CONTENTS 
OF 'BRLEV:' (NORMALLY 5) BUT 

maybe some value less than the 

THE CURRENT CONTENTS OF 'BRLEV:' 


; RETURN TO HERE WITH THE POP PRIORITY = 7 IF AN RXOI INTERRUPT 


IS: SCOPE 

175544 BIC XBIT6. 9 RXCS 


CLEAR THE RX 1 1 INTERRUPT ENABLE 


CZRXBFO RX11 
CZRX8F .P11 


INTERFACE TEST 
08-HAT -79 14.22 


MAC T 1 1 30AU052) 
TEST 3 - 


1 5 

29-MAY-79 08:23 PAGE 32 

INTERRUPT TEST PART 111 / PRIORITY LEVEL VERIFICATION PART 1 


SEO 006G 


003442 0001 37 004274 


AS: JHP CEXIT 


;END OF TEST 3 


1373 

003446 

005001 



T 4 : 

CLR 

Rl 

1 37A 








1375 








1376 

003450 

013702 

001204 



MOV KRXVEC, R2 

1377 

003454 

010246 




MOV 

R2,-(SP> 

1378 








1379 

003456 

012722 

003574 



MOV «1S 

. (R2>* 

1380 

003462 

012722 

000340 



MOV f PR7, (R2) ♦ 

1381 

003466 

012602 




MOV 

(SP) ♦ ,R2 

1382 







AB1T7.R1 

1383 

003470 

052701 

000200 



BIS 

1 38A 








1385 








1386 

003474 

013746 

000004 



MOV 

4 , — ( SP ) 

1387 

003500 

012737 

003516 

000004 


MOV 

A3S.4 

1388 

003506 

012737 

000240 

177776 


MOV 

APR5.PSW 

1 389 

003514 

000404 




BR 

AS 

1390 

003516 

022626 



3S: 

CMP 

(SP) ♦ . (SP) ♦ 

1391 

003520 

012637 

000004 



MOV 

(SP) ♦ ,4 

1392 

003524 

000430 




BR 

5S 

1393 

003526 

012637 

000004 


4S : 

MOV 

(SP) 4 ,4 

1394 

003532 

004737 

006226 



JSR 

PC.CPUPRI 

1395 








1396 








1397 







RO.-(SP) 

1398 

003536 

010046 




MOV 

1399 

003540 

012746 

003546 



MOV 

#64S,-(SP) 

1400 

003544 

000002 




RTI 


1401 

003546 




64S: 



1402 

003546 

052777 

000100 

175432 


BIS 

ABI T6.3RXCS 

1403 

003554 

000240 




NOP 


1404 

003556 

000240 




NOP 

PR7.-(SP> 

1405 

003560 

013746 

000340 



MOV 

1406 

003564 

012746 

003572 



MOV 

H65S.-(SP) 

1407 

003570 

000002 




RTI 


1408 

003572 




65S: 

BP 2S 


1409 

003572 

000401 






•SBTTL TEST 4 - INTERRUPT TEST PART IV / PRIORITY VERIFICATION PART II 

THE PURPOSE OF THIS TEST IS TO VERIFY THE PRIORITY OF THE RX11 INTERRUPT REQUEST LINE 

THE PROGRAM SETS THE POP PRIORITY = THE DEVICE LEVEL, (NORMALLY 5 OR THE CONTENTS OF L 
NO RX01 INTERRUPTS SHOULD OCCUR 

IF AN INTERRUPT DOES OCCUR THEN THE PRIORITY LEVEL OF THE RXl 1 IS [NOT I 

= THE NORMAL DEVICE LEVEL OF 5, OR WHATEVER IS THE VALUE IN LOCATION 'BRlEV:' 

BUT MAYBE SOME VALUE GREATER THAN THE CONTENTS OF LOC. 'BRLEV:' 

NOTE: IF THERE IS NO HARDWARE "PSU" THIS TEST WILL BE SKIPPED. 

A: CLR R1 .’INDICATOR TO CPU PRIORITY ROUTINE 

; TO DROP CPU PRIORITY 1 LEVEL 
.LESS THAN THE DEVI CF LEVEL 

MOV KRXVEC, R2 

MOV R2 ,-(SP) .’SAVE INTERRUPT VECTOR FOR 

; ERROR REPORT 

MOV #1S. C R2 ) ♦ ; RX01 VECTOR ADDRESS 

MOV IPR7. (R2M 

MOV CSP) ♦ ,R2 ; RESTORE INTERRUPT VECTOR FOR 

‘ERROR REPORT 

BIS IBIT7.R1 -SET INDICATOR TO CPU PRIORITY 

; ROUTINE TO SET CPU PRIORITY LEVEL 
; TO THE SAME LEVEL AS THE DEVICE 
MOV A.-(SP) ;SAVE 'BUSERR' TIMEOUT 'PC’ 

MOV t 31. A ; SET TIMEOUT VECTOR 

MOV APRS. PSU .’SET LEVEL TO 5 IF ’PSU 1 EXISTS 

BR AS ;G0 ON TO RESET VECTOR l DO TEST 

S: CMP (SPH.(SP)* .’CORRECT STACK FROM BUS TIMEOUT 

MOV (SPH.4 .’RESTORE TIMEOUT VECTOR TO 'BUSERR 1 

BR 5S ;N0 HARDWARE PSU - SKIP THIS TEST 

S: MOV ( SP ) ♦ ,4 .’RESET TIMEOUT VECTOR TO BUSERR 

JSR PC.CPUPRI .’CALCULATE CPU PRIORITY LEVEL TO 

;BE THE SAME AS THE DEVICE LEVEL 
;I.E. - SAME AS CONTENTS OF LOC. 

; 'BRLEV 

MOV RO.-(SP) ; ; PUT NEW PS ON STACK 

MOV #64S.-(SP) ;:PUT NEW PC ON STACK 

RTI ; ; POP NEW PC AND PS 

AS: 

BIS AB1 T6.3RXCS .’SET RX01 INTERRUPT ENABLE 


PUT NEW PS ON STACK 
PUT NEW PC ON STACK 
POP NEW PC AND PS 


; RETURN TO HERE WITH THE PD P PRIORITY -- 7 IF AN RX01 INTERRUPT 
; (RO) = N/A ; (Rl) = N/A ; (R2) = N/A 


003574 104000 


ERROR 


; PRIOR 1 T Y LEVEL NOT - TO CONTENTS 
; OF LOCATION 'BRlEV: 1 (NORMALLY 5) 


J 5 
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CZRXBF.P11 08-MAY-79 1A:22 TEST A - INTERRUPT TEST PART IV / PRIORITY VERIFICATION PART II SEO 0061 


1A17 

1A18 

1A19 

1A20 

1A21 

005576 

003600 

OOOOCA 

OA2777 

000100 

2S : 

1 75400 

SCOPE 

BIC IBIT6, S RXCS 

;BUT MAYBE SOME VALUE GREATER THAN 
; THE CONTENTS SPECIFIED BY LOC. 

; 'BRlEv: ' 

; CLEAR THE RX01 INTERRUPT ENABLE 

K22 

003606 

000137 

OOA27A 

5S: 

JMP CEX1T 

; END OF TEST A 


CZRXBF 0 RXll INTERFACE TEST 
CZRXBF .PIT 08-MAY-79 1 4:22 


K 5 
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TEST 5 - INI T [PROGRAMED] / RST 


1^23 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 


.SBTTL TEST 5 - INI T [PROGRAMED] / RST 


THE PURPOSE OF THIS TEST IS TO VERIFY THAT SETTING THE RXCS BIT 14 
CAUSES AN RX01 PROGRAMED SUBSYSTEM INITIALIZE 


THE RXCS SHOULD = 40 (DONE) 





; THE 

RXDB SHOULD = 4, OR 104. OR 

204, OR 

304 

003612 

052777 

040000 

175366 T 5 : 

BIS I8IT14, 9 RXCS 

0 

RX01 PROGRAMMED INITIALIZE 

003620 

004737 

006622 

IS: 

JSR PC. SDN 

0 

WAIT FOR THE DONE BIT 

003624 

000775 



BR IS 



003626 

012700 

000040 


MOV #40, RO 

0 

PROGRAM EXPECTS RXCS = 40 (DONE) 

003632 

017701 

175350 


MOV a RXCS, R1 

0 

ACTUAL RXCS 

003636 

020100 



CMP R 1 , RO 



003640 

001401 



BEQ 2S 






; (RO) 

= 40 ; ( R 1 ) = ACTUAL RXCS 

; (R2) -- 

N/A 

003642 

104000 



ERROR 

• 

RXCS NOT = 40 




IF THE FAULT CANNOT BE FOUND ON THE UNIBUS INTERFACE MODULE 
AND/OR THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE MODULE 
M7846 THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/WRITE 
MODULE M 7727. 


NOTE: 


ONLY APPROX. 30X OF THIS MODULE LENT ITSELF CONDUCIVE TO 
THE FAULT INSERTION PROCESS; ERGO, THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS MODULE IS NOT VERY HIGH. 
HOWEVER, ANALYSIS OF THE FOLLOWING AREA/S, IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS. SHOULD AT 
LEAST PLACE YOU WITHIN THE RELEVANT AREA ON THE MODULE. 


M7727 (READ/WRITE CONTROL) 

SIGNAL NAME REASON 

*J' INPUT LOCKED LOW 


POSSIBLE CHIPS 
E 16 


/: W: W: W: W: W: W: W: W : W : W : W : W : W : W : W : W : W : \* 
W: W: W: W: W: W: W: \*/: \*/:W:W:W:W:W:W:W:W:\» 
/:\*/: W: W: W: W: W: W: W: W: \«/: W: W: W: W: W: W:\*/:\* 


1471 003644 104413 

1472 


1473 

1474 

1475 

1476 

1477 

1478 


21: SUBSCOPE 

////////////// ///////////////////////////// nun nn un m >11111/111111 nun 

7 b - - 3 2 1 0 / 


SEL 

DRIVE 


DD 


WRITE INI T PAR 
PROTECT [DONE] 


CRC 



1 


CZRXBf 0 RK1 1 INTERFACE TEST 
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K79 
1480 
K.81 
K82 
K83 
USA 
1485 
H 86 
1487 
U88 
K89 
K90 
K91 
1A92 
1 495 
K9A 
K95 
K96 
H97 
K98 
K99 

1500 

1501 

1502 


MACYll 30A( 1052) 29-MAY-79 08:23 PAGE 

TEST 5 - 1N1T C PROGRAMMED] / RST 


SEQ 0063 


(N/A) 


003646 

003652 

003656 

003660 

003664 

003670 

003672 

003676 

003702 

003704 


012700 

017702 

010201 

042701 

105737 

100404 

042701 

042700 

020100 

00K01 


000204 

175332 

000100 

012752 

000200 

000200 


;✓///////✓/✓//✓/✓/✓////✓✓/✓✓/////✓/✓///////✓///////////////✓///////////////✓//// 

; THE RXDB SHOULD = A. 10A. IF TESTING UNIT 1 
; OR 20A . OR 30A IF TESTING UNIT 0 (SEL. DRIVE RDY . BIT SET) 

MOV f 20A.R0 
MOV 8RXDB.R2 
MOV R2.R1 

BIC IBIT6.R1 .-CLEAR DELETED DATA BIT 

TSTB UN1TSEL ;WAS UNIT 0 SELECTED 

BM1 51 

BIC IB1T7.R1 .-UNIT 0 WAS NOT SELECTED 

BIC #B 1T7.R0 .-CLEAR UNIT 0 RDY BITS 

3$ : CMP R1 , RO 

BEQ AS 


(RO) = A. OR 20A 

(R1 ) = ACTUAL RXDB MINUS DELETED DATA BITA6 
C R 2 > = ACTUAL RXDB 


003706 lOAOOO 


ERROR 


; RXDB NOT - A, OR 10A. OR 20A. OR 30A 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; T H I S ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
.-BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

■IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 


M78A6 (UNIBUS INTERFACE) 


SIGNAL NAME 


REASON 


RX INI ? 
IN 

BUS DOS 
RX DATA 


B SER DATA 
DONE 


STUCK HIGH 
STUCK HIGH 
STUCK LOW 
STUCK LOW 

SACK FLOP CLOCK LOCKED LOW 
STUCK LOW 
STUCK HIGH 

LOAD PULSE STUCK LOW 


POSSIBLE CHIPS 

E11.E36 

Ell 

El 

EU 

E9 

E9 

E 22 

ES 


✓ : W: W: W: W: W : W: W: W: W : \*/: W : W: W: W: W: \*/: W:\* 
/: W: W: W: W: W: W : W: W: W : W : W : W : W : W : W : W : W : \» 
/ : W : W : W : W : W : \*/ : W : W : W : W : W : \*/ : \ • / : W : W : W : W : \ * 


1533 003710 104413 


U: SUBSCOPE 


000013 

ooooto 

175252 


CZRXBFO RXl 1 INTtRFACE TEST 
CZRXBF.P11 08-MAY-79 H:22 


1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 
1 54,2 

1543 

1544 

1 545 

1546 

1547 

1548 

1549 

1550 

1551 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 


MACYll 30A< 1052) 29-MAY-79 08:23 PAGE ?6 

TEST 5 - INI T [PROGRAMMED] / RST 

; TEST 5 CONT'D - RXCS TEST PART 11 / RST 


SEO 0064 


THE PURPOSE OF THIS TEST IS TO VERIFY THE RST COMMAND #12*G0 
AND THAT THE DONE BIT IS CLEARED AFTER THE FUNCTION IS ISSUED. 


003712 

003720 

003726 

003730 

003734 


003736 

003740 

003742 

003746 

003750 

003754 

003760 

003762 


012777 

032777 

001404 

017701 

005000 


104000 

104413 

004737 

000775 

012700 

017701 

020100 

001401 


175266 

175260 


MOV #13, a R\CS 
BIT IB1T5. a RXCS 
BEQ 5$ 

MOV a RXCS, R1 
CLR RO 


; RST COMMAND 

; TEST DONE BIT (SHOULD = 0) 


(RO) = 0 ; ( R 1 ) = ACTUAL RXCS ; (R2) = N/A 


006622 

000040 

175226 


003764 104000 


ERROR 

51: SUBSCOPE 

9t: JSR PC, SDN 

9R 9S 

MOV #40, RO 
mov a RXCS. R1 
CMP R 1 , RO 
BEQ 10S 

; (RO) = 40 ; (R1) = ACTUAt RXCS ; (R2) 
ERROR 


DONE BIT NOT = 0 

WAIT FOR DONE FLAG 

PROGRAM EXPECTS RXCS = 40 (DONE) 
ACTUAL RXCS 


; RXCS NOT = 40 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
;THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

i IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 


M7846 (UNIBUS INTERFACE) 


SIGNAL NAME 


REASON 


POSSIBLE CHIPS 


RX DATA 


PARITY FLOP CLOCK LOCKED HIGH 
PARITY FLOP 'Q* OUTPUT 
LOCKED HIGH 
STUCK LOW 


/: \*/:\*/: W: W: W:\*/:\*/: W: W 
/:W: W: W: W: W: W: W: W: W 
: W: W: W: W:W: \*/: W:W: W 


W: \*/:W: W: \*/:W: W:\* 
W : \ */ : W : V* / : \ */ : W :W 


1586 003766 

1587 

1588 

1589 


104413 


SUBSCOPE 


; THE RXDB SHOULD = 200 (IF DRIVE 0 IS READY). OR 0 IF UNIT 0 IS NOT SELECTED 
; MAYBE 300 (IF DRIVE 0 IS READY AND SECTOR 1 WAS WRITTEN WITH DELETED DATA) 


N 5 

CZRXBFO R XU INTERFACE TEST RAC Y 1 1 30AU052) 29-MAY-79 08:23 PAGE 37 


CZRXBF 

P11 08-MAY-79 

14:22 

TEST 5 

- 1N1T [PROGRAMMED] / RST 


1590 







1591 

003770 

017702 

175214 


MOV a RXDB, R2 

; ACTUAL RXDB 

1592 

003774 

010201 



MOV R2 , 91 


1593 

003776 

042701 

000100 


B1C I81T6, R1 

; CLEAR N/A DELETED DATA BIT 

1594 

004002 

012700 

000200 


MOV #200, RO 

; EXPECT UNIT 0 RDY SET 

1595 

004006 

105737 

012752 


TSTB UNITSEL 


1596 

004012 

100403 



BM! 11$ 


1597 

004014 

042701 

000200 


B1C #B1T7,R1 

; UNIT 0 NOT SELECTED 

1598 

004020 

005000 



CLR RO 

; DISREGUARD RDY BITS 

1599 

004022 

020100 


IIS: 

CMP R1 , RO 


1600 

004024 

001401 



BEQ 12$ 


1601 







1602 




; (R0) 

= 0 OR 200 


1603 




; (R1 ) 

= ACTUAL RXDB MINUS DELETED 

DATA BIT#6 

1604 




; (R2) 

= ACTUAL RXDB 


1605 







1606 

004026 

104000 



ERROR 

; RXDB NOT - 200, OR NOT = 0 

1607 

004030 

000004 


12$: 

SCOPE 


1608 

004032 

000137 

004274 


JMP CEX1T 

;END OF TEST 5 


SEQ 0065 


CZRXBFO RX11 INTERFACE TEST 
CZRXBF .P1 1 08-MAY-79 14:22 

1609 

1610 
1611 
1612 
1613 
16K 
1615 


1632 

1633 

1634 

1635 

1636 

1637 

1638 

1639 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

1648 

1649 


B 6 
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TEST 6 - FILL BUFFER TRANSFER LENGTH VERIFICATION 

.SBTTL TEST 6 - FILL BUFFER TRANSFER LENGTH VERIFICATION 

; THE PURPOSE OF THIS TEST IS TO VERIFY THE TRANSFER LENGTH OF THE FUNCTION 
; "FILL BUFFER" OF THE RX01 MICROCONTROLLER 

; 128 BYTE TRANSFERS SHOULD OCCUR 


SEQ 0066 


1616 

004036 

012737 

000006 

012352 

T 6 : 

MOV 16, PAT 

; COUNT PATTERN 


1617 

004044 

004737 

004054 



JSR PC, T6F ILL 



1618 

004050 

000137 

004274 



JMP CEXIT 

;END OF TEST 6 


1619 









1620 





: EXECUTE T HE FOLLOWING " MOV 11. 

a RXCS " INSTEAD OF " INC a RXCS 

"FOR LOOPS 

1621 









1622 

004054 

005002 



T6F ILL : 

CLk R2 

; F ILL BUFFER FUNCTION CO ♦ 

GO BIT} 

1623 

004056 

012777 

000001 

175122 


MOV #1, a RXCS 

1624 

004064 

004737 

012306 



JSR PC, GETPATTERN 



1625 

004070 

012704 

017456 



MOV iBUFADR, R4 



1626 

004074 

004737 

004112 


It: 

JSR PC, FBEB 

; SUBROUTINE TO F 1LL/EMPT Y 

BUFFER 

1627 

004100 

000207 




RTS PC 

; EXIT SUBROUTINE T6F ILL 


1628 









1629 

004102 

112477 

175102 



MOVB C R4 ) ♦ , a RXDB 

; FILL THE SECTOR BUFFER 


1630 

004106 

005202 




INC R2 

; INC R2 FOR BYTE COUNT 


1631 

004110 

000771 




BR It 




SUBROUTINE TO FILL AND EMPTY THE SECTOR BUFFER 


004112 

004116 

004120 

004124 

004126 

004132 

004134 

004140 

004142 


004737 

000403 

062716 

000207 

004737 

000767 

005777 

100003 

017701 


006606 

FBEB: 

JSR PC. STR 

BR It 

; TEST FOR TRANSFER REQUEST 

000002 


ADD #2. a SP 

RTS PC 

; ADJUST FOR EXIT FROM THIS SUBROUTINE 
; EXIT TO SERVICE TRANSFER REQUEST 

006622 

It: 

JSR PC, SDN 

BR FBEB 

; NOT TRANSFER REOUEST OR DONE 

175046 

175042 


TST a RXCS 

BPL 3t 

MOV aRXDB.RI 

.-TEST FOR ERROR FLAG 


004146 104000 


(RO) = N/A ; 
ERROR 


(R1 ) = RXDB (STATUS A) 


(R2) = ACTUAL » OF TRANSFERS 
; UNEXPECTED RX11 ERROR FlAG 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
;THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS, AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

; 1 F THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
.•ANALYZE THE FOLLOWING AREA/S: 


M7846 (UNIBUS INTERFACE) 


C 6 
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CZRXBF.P11 08-MAY-79 14:22 TEST 6 - FILL BUFFER TRANSFER LENGTH VERIFICATION SEQ 0067 

; SIGNAL NAME REASON POSSIBLE CHIPS 

; PARITY FLOP CAN’T BE CLEARED E2 

;/:W: W: W:W:W:W: W: W: W: WsW: W: W:W: W:W:W:\* 


1673 

1674 

1675 

1676 

004150 

104413 

1677 

004152 

022702 

1678 

1679 

1680 
1681 

004156 

001401 

1682 

1683 

004160 

104000 


000200 


3$: SUBSCOPE 

; 128 BYTES SHOULD HAVE BEEN TRANSFERRED TO OR FROM THE SECTOR BUFFER 

CMP #200, R2 
BEQ 2$ 

; (RO) = N/A ; (R1) = N/A ; (R2) = ACTUAL # OF TRANSFERS 

ERROR ; INCORRECT TRANSFER LENGTH 


; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
; THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
.'BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

; IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANALYZE THE FOLLOWING AREA/S: 

M7846 (UNIBUS INTERFACE) 

SIGNAL NAME REASON POSSIBLE CHIPS 

RX DATA STUCK LOW E19.E6 

/: W: W: W: \*/:\*/: W: W: W: W: W: W: W: W:W: W: W: W:\* 
/:W:W:W:W:W:W:W:W:W:W:W:W:W:\*/:W:W:W:\» 
/: W: W: \*/:\*/: W: \*/: W: W: W: W: W: W: W: W: W: W : W:\« 


1707 004162 000004 

1708 

1709 004164 000207 


2S: 


SCOPE 
RTS PC 


; EXIT SUBROUTINE FBEB 


CZRXBFO RX11 
C2RXBF .PI 1 


1710 

1711 

1712 

1713 

1714 

1715 

1716 

1717 

1718 

1719 

1720 

1721 

1722 


INTERFACE TEST 
08-MAY-79 14:22 


MACYll 


30A( 1052) 
TEST 10 - 


D 6 

29-HAY-79 08:23 PAGE AO 
EMPTY BUFFER XFER LENGTH AND 


1739 

1 740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 


CONTENT VERIFICATION PART II 

.SBTTL TEST 10 - EMPTY BUFFER XFER LENGTH AND CONTENT VERIFICATION PART II 

THE PURPOSE OF THIS TEST IS TO VERIFY THAT THE PREVIOUS EMPTY BUFFER TEST 
DID NOT EMPTY AND DESTROY THE CONTENTS OF THE SECTOR BUFFER 
NOTE: TEST 6 MUST BE RUN BEFORE THIS TEST. 


SEQ 0068 


004166 000240 


T 10: NOP 

.SBTTL TEST 7 


; NOP FOR T10 " FAST ” DEFINITION 
EMPTY BUFFER XFER LENGTH AND CONTENT VERIFICATION PART 


y r l j 

1724 

004170 

004737 

004200 

T 7 : 

JSR PC. T7EMPTY 

1725 

004174 

000137 

004274 


JHP CEX1T 

1726 

004200 

005002 


T7EMPTY 

: CLR R2 

1727 

004202 

012777 

000003 

174776 

MOV #3. a RXCS 

1728 

004210 

012704 

017456 


MOV IBUFADR. R4 

1729 

004214 

004737 

004112 

2S: 

JSR PC. FBEB 

1730 

004220 

000207 



RTS PC 

1 731 






1732 




; EMPTY 

BUFFER AND VER1 

1733 

1734 

004222 

112400 



MOVB CR4)+. RO 

1735 

004224 

117701 

174760 


MOVB a RXDB. R1 

1736 

004230 

005202 



INC R2 

1737 

004232 

020001 



CMP RO. R1 

1738 

004234 

001401 



BED IS 


THE PURPOSE OF THIS TEST IS TO VERIFY THE TRANSFER LENGTH OF THE F0UNCT10N 
"EMPTY BUFFER" AND ALSO TO VERIFY THE CONTENTS OF THE SECTOR BUFFER 
NOTE TEST 6 MUST BE RUN BEFORE THIS TEST 


; END OF TEST 7 OR 10 
; ISSUE THE COMAND TO EMPTY BUFFER 


SUBROUTINE TO EMPTY BUFFER 
EXIT SUBROUTINE T7EHPTY 


EXPECTED CONTENTS OF SECTUR BUFFER 
ACTUAL CONTENTS OF SECTOR BUFFER 
ACTUAL » TRANSFERS TO THIS ERROR 


IF AN ERROR OCCURS: 

(RO) - EXPECTED CONTENTS OF SECTOR BUFFER 
(R1 ) - ACTUAL CONTENTS FROM SECTOR BUFFER 
(R2) - TOTAL # OF ACTUAL TRANSFERS 


004236 104000 


ERROR 


DATA " TO " SB NOT = DATA " FROM 


;/*\:/*\:/*\:/*\:/*\:/*\:/*\:/*\:/*\:/*W*\:/*\:/*\:/*\:/*\:/*\ : /*\:/*\: 

THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
AREAS TO CHECK F0» THE RELEVANT FAULT/S. 

IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
ANALYZE THE FOLLOWING AREA/S: 


M7846 (UNIBUS INTERFACE) 
SIGNAL NAME 


REASON 


POSSIBLE CHIPS 
E24 


. RX RUN 


STUCK LOW 



; IF THE FAULT CANNOT BE FOUND ON THE UNIBUS INTERFACE NODULE 
; AND/OR THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE NODULE 
.N7846 THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/WRITE 
; NODULE N7727. 

NOTE: ONLY APPROX. 30X OF THIS NODULE LENT ITSELF CONDUCIVE TO 

THE FAULT INSERTION PROCESS; ERGO, THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS NODULE IS NOT VERY HIGH. 
HOWEVER. ANALYSIS OF THE FOLLOWING AREA/S. IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS, SHOULD AT 
LEAST PLACE YOU WITHIN THE RELEVANT AREA ON THE NODULE. 

N7727 (READ/WRITE CONTROL) 

SIGNAL NANE REASON POSSIBLE CHIPS 

REPLACE E5 

/:\*/:\*/:\*/:\*/:W:\*/:\*/:\*/:W:S*/:\*/:\*/:\*/:\*/:\*/:W:\*/:\* 

/: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W: W:\* 

/: W: W: W: W: W: W: W: W: W: W: W: W:\*/: \*/: W: W: \*/:\* 


1796 004240 

1797 004242 

1798 

1799 

1800 
1801 
1802 

1803 00A2A4 
180A 004252 

1805 

1806 

1807 

1808 004254 

1809 004260 

1810 004264 

1811 004270 


000004 

000764 


012737 000001 
000402 


005037 012352 
004737 004054 
004737 004200 
000157 004274 


012352 


IS: SCOPE 

BR 2S 

. SBTTL TEST 12 - F ILL/ENPT Y BUFFER ALL 1 ' S 

; PR0GRANN1NG NOTE: THE FOLLOWING " NOV " INSTEAD OF *’ INC " FOR LOOPS 

T 1 2 : NOV II. PAT 

BR .+6 

.SBTTL TEST 11 - F ILL/ENPT Y BUFFER ALL O’S 

Til: CLR PAT 

JSR PC. T6F ILL 

JSR PC. T7ENPTY 

JNP CEX1T ; END Of TEST 11 OR 12 



CZRXBFO R X 1 1 INTERFACE TEST 
CZRXBF.P11 08-NAY -79 14:22 


1812 

1813 

1814 

1815 

1816 

1817 

1818 

1819 

1820 
1821 
1822 
1825 

1824 

1825 

1826 

1827 

1828 

1829 

1830 

1831 

1832 

1833 

1834 

1835 

1836 

1837 

1838 

1839 

1840 

1841 

1842 

1843 

1844 

1845 

1846 

1847 

1848 

1849 

1850 

1851 

1852 

1853 

1854 

1855 

1856 

1857 

1858 


004320 

004324 

004326 

004334 

004340 

0C4342 

004346 

004352 

004354 

004360 

004362 


004364 

004366 


004370 

004374 

004376 

004404 

004410 

004412 

004416 

004422 

004424 

004430 

004432 


105737 

100020 

012777 

004737 

000775 

012700 

017702 

010201 

042701 

020001 

001401 


104000 

104413 


005737 

100020 

012777 

004737 

000775 

012700 

017702 

010201 

042701 

020100 

001401 


012752 

000033 

006622 

000200 

174566 

000100 


004434 104000 


NACYll 30A11052) 
TEST 11 ■ 


F 6 

29-NAY-79 08:23 PAGE 42 
FlLL/ENPTY BUFFER ALL 0'S 


SEQ 0070 


004274 012737 000103 
004302 000137 002200 

0G4506 012737 000104 
00*»314 000137 002200 


002562 CEX1T: NOV I'C.NX 

JNP NORETESTS 


002562 DEX1T 


NOV f'D.NX 
JNP NORETESTS 


;EOP INDICATOR FOR END OF CONTROL TESTS 


;EOP INDICATOR FOR END OF DRIVE TESTS 


SBTTL TEST 13 DRIVE READY VERIFICATION 


; THIS TEST VERIFIES THAT DRIVE READY WILL SET FOR ALL SELECTED DRIVES. 
.-THIS SECTION OF TEST FOR UNIT 0 DRY NO A READ STATUS A FUNCTION 


012752 

000013 

006622 

000200 

174636 

000100 


174652 


TSTB UNITSEL 
BPL 2$ 

NOV #1 3.3RXCS 
JSR PC, SDN 
BR IS 

NOV #200, RO 
NOV 9RXDB.R2 
NOV R2,R1 
BIC IBIT6.R1 
CNP R0.R1 
BEG 2 S 


; WAS UNIT 0 SELECTED 
;N0, GO TEST UNIT 1 
.-READ STATUS A UNIT 0 
; WA1 T FOR DONE FLAG 

; E XPE C T DRIVE READY TO BE SET 

.•actual rxdb 
; clear dd bit if set 

.-WAS ” DRY “ SET AND IN] TDONE CLEARED 


; R 0 = 200 : R1 = RXDB N1NUS DD BIT ;R2 = ACTUAL RXDB 
ERROR 

24: SUBSCOPE 

; TEST FOR UNIT 1 DRIVE READY ON A READ STATUS A FUNCTION 


174602 


TST UNITSEL 
BPL 34 

NOV #33,aRXCS 
JSR PC, SDN 
BR 44 

NOV I200.R0 
NOV 3RXDB.R2 
NOV R2.R1 
BIC IB1T6.R1 
CNP R1.R0 
BEQ 34 


.-WAS UNIT 1 SELECTED 
;N0. GO TO END OF TEST 
;READ STATUS A FOR DRIVE 1 
.-WAIT FOR DONE FLAG 

.•EXPECT '• DRY " TO BE SET 


.•CLEAR DD BIT IF ANY 
; 1 S DRY SET AND INI TDONE CLEARED 


; RO = 200 ; R1 = RXDB H1NUS DD BIT ; R2 - ACTUAL RXDB 
ERROR 


;/t\:/.\:/*\:/*\:/*\:/*\:/*\:/»\:/*\:/*\:/*\:/*\:/*\:/*\:/*\:/»\:/*\:/*\: 

; 1 F THE FAULT CANNOT BE FOUND ON THE UNIBUS INTERFACE NODULE 
; AND/OR THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE NODULE 
;N7846 THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/WRITE 
.NODULE N7727. 


6 6 

C7RXBF0 R X 1 1 INTERFACE TEST MAC 1 1 1 30A(1052> 29-HAY-79 08:23 PAGE A3 

CZRXBF.P11 08-HAY -79 H:22 TEST 13 DRIVE READY VERIFICATION SEQ 0071 


NOTE: ONLY APPROX. 30X 0' THIS HODULE LENT ITSELF CONDUCIVE TO 

THE FAULT INSERTION PROCESS; ERGO, THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS HODULE IS NOT VERY HIGH. 
HOWEVER, ANALYSIS OF THE ‘OLLOWlfio AREA/S. IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS, SHOULD AT 
LEAST PLACE YOU WITHIN THE RELEVANT AREA OH THE HODULE. 

H7727 (READ/WRITE CONTROL) 

SIGNAL NAHE REASON POSSIBLE CHIPS 


NOTE: HAKE SURE THE DRIVES ARE CONNECTED CORECTL Y , THE 

DISKETTES INSERTED. AND THE DOORS OF THE SELECTED DRIVES 
ARE CLOSED. IF THE THESE CONDITIONS ARE NOT SET THERE 
WILL BE AN ERROR AT THIS POINT. 


St' DK1 STUCK LOW E13.EK 

DKl 1NDX STUCK HlGH/LOW E15 

SEL INDX STUCK HlGH/LOW E 1 S 

’ A2 ' INPUT STUCK LOW E T 5 


;/:W:W:W:W:W:W:\*/:W:W:W:W:W:W:W:W:W:W:\* 

;/:W:W:\*/:W:W:W:W:W:W:W:W:W:W:W:W:W:W:\* 

1896 00*.*, 36 00000*i 3S: SCOPE 

1897 00*.AA0 000137 00*.306 JHP DEX1T ;cND OF TEST 15 


SEQ 0072 


CZRXBFO 
CZRXBF .1 

1898 

1899 

1900 

1901 

1902 
1905 
1904. 

1905 

1906 

1907 

1908 

1909 

1910 

1911 

1912 
1915 

1914 

1915 

1916 

1917 

1918 

1919 

1920 

1921 

1922 
1925 
192A 


1949 

1950 

1951 

1952 
1955 


RX11 I N (ERF ACE TEST 
11 08-HAY-79 14:22 


H 6 

HACYll 50A ( 1052) 29-NAY-79 08:25 PAGE 44 

TEST 14 - ERROR f LAG AND B-CODE VERIFICATION PART ] 


i 


.SBTTL TEST 14 - ERROR FLAG AND B-CODE VERIFICATION PART 1 


THE PURPOSE OF THIS TEST IS TO VERIFY THAT TRYING TO READ A NON-EXISTANT 
SECTOR WILL CAUSE AN ERROR, AND ThE CORRECT ERROR CODE WILL BE PUl 
INTO THE RXDB WHEN THE B STATUS IS READ. 


; THIS SECTION INSURES THAT ONLY 2 TR FLAGS WERE REQUIRED TO TAKE THE 
.DISKETTE ADDRESS. AND THAT AN ERROR DOES EXIST. 


004444 

005002 



004446 

005000 



004450 

105757 

012752 


004454 

100004 



004456 

012777 

000007 

174522 

004464 

000405 



004466 

012777 

000027 

1 74512 

004474 

004757 

005154 


004500 

000406 



004502 

012700 

100040 


004506 

017701 

174474 


004512 

020001 



004514 

001401 



004516 

104000 




T 1 4 : CLR R2 

CLR RO 

TSTB UN1TSEL 
BPL 10* 

MOV #7.8RXCS 
BR IIS 

1 0S : NOV *27, 8RXCS 

IIS: JSR PC.1LLADR 

BR IS 

NOV #100040, RO 
NOV 8RXCS.R1 
CUP R0.R1 
BEQ 2S 

;R0 = 100040 ; R1 - ACTUAL RXCS ; R2 
IS: ERROR 


; I S UNIT 0 SELECTED 

.SET READ SECTOR FUNCTION AND GO 

; SEND READ FUNCTION TO UNIT 1 
.'SEND THE BAD SECTOR ADDRESS 
; PREMATURE ERROR CONDITION 
.'EXPECT ERROR AND DONE BITS 
.SAVE THE RXCS 


= # OF TR FLAGS 




; THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
;THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
; BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
; AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

•IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
; ANAL YZE THE FOLLOWING AREA/S: 

; M 7846 (UNIBUS INTERFACE) 

; SIGNAL NAME REASON POSSIBLE CHIPS 

•BUS D 1 5 STUCK HIGH E 14.E9.E40.E24 

;»X RUN STUCK LOW £41 

;/:W:W:W:'*/:W:W:W:W:W:W:W:W:W:W:W:W:W:\* 

;/:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:\« 

004520 104415 21 : SUBSCOPE 

; T 1 4 CONT. - THIS SECTION TESTS THAT NO PARITY OR CRC ERROR OCCURRED 
;0N PREVIOUS FUNCTION. 


CZRXBFO R X 1 1 
CZRXBF .P1 1 


INTERFACE TEST MAC V 1 1 
08-HAY -79 14:22 


1 6 

30A( 1052) 29-HAY-79 08:23 PAGE 45 

TEST K - ERROR FLAG AND B-CODE VtRIFICATlON PART 


1954 

1955 

1956 

1957 

1958 

1959 

1960 

1961 

1962 

1963 

1964 

1965 

1966 

1967 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 


004522 

004524 

004530 

004532 

004536 

004540 


004542 

004544 


004546 

004554 

004560 

004562 

004566 

004570 

004574 

004600 


004604 

004606 


004610 

004614 

004620 

004622 

004624 


005000 



CLR RO 

; ST ATUS A SHOULD BE CLEAR 

017702 

174460 


MOV 9RXDB.R2 


010201 



MOV R2.R1 


042701 

000100 


SIC IB1T6.R1 


020001 



CMP R0.R1 


001401 



BEQ 31 




;R0 = 

0 ; R1 = RXDB MINUS 

DD BIT ; R2 = ACTUAL RXDB 

104000 



ERROR 


104413 


3S: 

SUBSCOPE 




; T 14 

CONI. - THIS SECTION 

TESTS THAT NO ERROR CONDITIONS EXIST ON A 



;READ 

STATUS B FUNCTION. 


012777 

000017 174432 


MOV f 1 7.3RXCS 

; SE T READ STATUS B FUNCTION 

004737 

006622 

41: 

JSR PC. SDN 

; WA I T FOR DONE FLAG 

000775 



BR 4$ 


005777 

174420 


T ST 3RXCS 

;IS THE ERROR BIT SET 

100007 



BPL 5S 

; NO , GO ON TO NEXT SECTION 

012700 

000040 


MOV I40.R0 

; YES .SET UP FOR ERROR 

017701 

174406 


MOV 8RXCS.R1 


017702 

174404 


MOV 8RXDB.R2 




II 

o 

oc 

40 ; R1 = RXCS ; R2 

- RXDB 

104000 



ERROR 

;RXCS NOT = 40 

104413 


51: 

SUBSCOPE 




; T 14 

CONT. - THIS SECTION 

TESTS THE B-CODE FOR '* CAN’T FIND SECTOR 

012700 

000070 


MOV 170, RO 


017701 

174370 


MOV 8RXDB.R1 


005002 



CLR R2 

; 1 S THE B-CODE - 70 

020001 



CMP R0.R1 

001401 



BEQ 61 



;R0 = 70 ; R1 = ACTUAL B-CODE ; R2 = N/A 


04626 104000 ERROR ;RX[ 

/•\:/t\ : /*\:/#\:/*\:/t\:/*\:/*\:/*\:/#\:/#\:/*\:/*\:,*\: 

; ] F THE FAT * sNNOT BE FOUND ON THE UNIBUS INTERFACE MODULE 
; AND/OR THE 'A . * IS NOT INHERENT TO THE UNIBUS INTERFACE MODULE 
;M7846 THERE ... a POSSIBILITY OF ITS EXISTENCE ON THE READ/UR ITE 
.MODULE H7727. 

NOTE: ONLY APPROX. 30X Of THIS MODULE LENT ITSELF CONDUCIVE TO 

THE FAULT INSERTION PROCESS; ERGO, THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS MODULE IS NOT VERY HIGH. 

however, analysis OF THE following area/s. if this error 

REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS, SHOULD AT 


; RXDB NOT - 70 



J 6 
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CZRXBF.P11 08-F1AY-79 14:22 TEST 14 - ERROR FLAG AND 8-CODE VERIFICATION PART I SEO CO 74 

; LEAST PLACE YOU WITHIN THE RELEVANT AREA ON THE NODULE. 


M 772 7 (RE AD/UR J T E CONTROL) 


SIGNAL NAF1F REASON 


POSSIBLE CHIPS 


INI T 

SEL TRK 0 
DAT TRK 0 
SEL DKO 
UT GATE 
SEL UT PROT 
RAW DATA 
STEP 


STUCK HIGH 
STUCK HIGH 
STUCK HIGH 
STUCK LOU 
STUCK HIGH 
STUCK LOU 
STUCK HIGH/LOU 
STUCK LOU 
REPLACE E4 


E16 
E 1 5 
E15 

E15,E14,E13 
E5 
E5 
E 14 
E 1 4 


/: W: W: W: W: W: W: W: W: W:W: W:W:\«/s W: W:W: W:\* 
/: \*/: W: W: W: W: W: W: W: W: \*/:W: W: W: W: W: W: W:\* 
/:\*/: W: W: W: W: W: W: W: W: W: W: W: W:W: W: W: W:\* 


2030 004650 000004 

2031 0C4652 000157 004306 

2032 


6S: SCOPE 

JHP DEXIT 


; END OF TEST 14 


I 



K 6 


CZRXBFO RX11 INTERFACE 

1ES1 

MAC Y 1 

50A ( 1052) 29-NAY-79 08:23 

PAGE 47 

CZRXBF 

P11 08-NAY-79 

14:22 


T E S 1 

15 * ERROR FLAG AND B 

-CCDE VERIFICATION PART 11 

2055 






.SBTTl TEST 15 - ERROR FLAG AND B-CODE VERIFICATION PART II 

2054 








2055 





.-THIS 

TEST VERIFIES THAT TRYING TO WRITE, USING DELETED DATA NODE , ON A 

2056 





; NON- 

EXIST ANT SECTOR WILL 

PRODUCE AN ERROR AND THE CORRECT B-CODE IS PRODUCED 

2057 





; THIS 

SECTION SENDS OUT AN 

ILLEGAL SECTOR ADDRESS AND EXPECTS AN ERROR 

2058 





; NOTE TEST 14 MUST BE RUN 

BEFORE THIS TEST 

2059 








2040 

004656 

005000 



T 1 5 : 

CLR RO 


2041 

004640 

005002 




CLR R2 


2042 

004642 

105757 

012752 



T STB UNITSEL 

;WAS UNIT 0 SELECTED 

2045 

004646 

100004 




BPL 10S 


2044 

004650 

012777 

000015 

174330 


MOV #1 5.8RXCS 

; SET WRITE DELETED DATA FUNCTION 

2045 

004656 

000405 




BR IIS 


2046 

004660 

012777 

000055 

174320 

104 : 

NOV #55 ,8RXCS 

.-SEND WTR DD FUNCTION TO UNIT 1 

2047 

004666 

004757 

005134 


IIS: 

JSR PC , ILLADR 

.SEND THE ILLEGAL SECTOR ADDRESS 

2048 

004672 

000406 




BR IS 

; PRENATURE ERROR CONDITION 

2049 

004674 

012700 

100040 



NOV #1 O0040.R0 

.•EXPECT ERROR AND DONE FLAGS 

2050 

004700 

017701 

174302 



NOV 8RXCS.R1 


2051 

004704 

020001 




CHP R0.R1 


2052 

004706 

001401 




BEQ 2S 


2055 








2054 

2055 

2056 





;R0 = 

100040 ; R 1 = ACTUAL 

RXCS ; R2 = # OF TR FLAGS 

004710 

104000 



IS: 

ERROR 

;RXCS NOT = 100040 

2057 

2058 

2059 

004712 

104415 



2S: 

SUBSCOPE 






;T15 

CONT. - THIS SECTION 

TESTS THAT THERE IS NO PARITY. CRC ERROR 

2060 





; AND 

THAT THE DELETED DATA 

BIT IS SET. 

2061 






CLR R2 


2062 

004714 

005002 




;EXPECT DELETED DATA Bit TO BE SET 

2065 

004716 

012700 

000100 



NOV #100, RO 

2064 

004722 

017701 

174262 



NOV 8RXDB.R1 


2065 

004726 

020001 




CNP R0.R1 


2066 

2067 

2068 

004750 

001401 




BEQ 3S 






; RO 

= 100 ; R1 = ACTUAL RXDB ; R2 - N/A 

2069 

004752 

104000 




ERROR 

.•DELETED DATA NOT SET OR OTHER ERRORS 

2070 

2071 

2072 
2075 
2074 

004754 

104413 



3S: 

SUBSCOPE 






; T 1 5 

CONT. - THIS SECTION 

TESTS FOR THE B-CODE FOR ILLEGAL SECTOR. 

004756 

012777 

000017 

174242 


NOV #1 7.8RXCS 

;SET READ STATUS B FUNCTION 

2075 

004744 

004757 

006622 


4S: 

JSR PC. SDN 

.•WAIT FOR DONE FLAG 

2076 

004750 

000775 




BR 4$ 


2077 

004752 

012700 

000070 



NOV #70, RO 


2078 

004756 

017701 

174226 



NOV 8RXDB.R1 


2079 

004762 

020001 




CNP R0,R1 


2080 

2081 

2082 

004764 

001401 




BEQ 5S 






; RO 

- 70 ; R1 = ACTUAL B- 

CODE ; R2 = N/A 

2085 

004766 

104000 




ERROR 

; RXDB NOT - 70 

2084 

004770 

000004 



5S: 

SCOPE 

;END OF TEST 15 

2085 

004772 

000137 

004306 



JNP DEX1T 


SEO 0075 


CZRXBFO 

RX11 INTERFACE 

TEST 

NACYll 

L 6 

30AU052) 29-NAY-79 08:23 PAGE 48 

CZRKBF . 

P11 08-NAY-79 

14:22 


-TEST 

16 - ERROR FLAG AND B-CODE VERIFICATION PART 111 SEQ 0076 

2086 






.SBTTl TEST 16 - ERROR FLAG AND B-CODE VERIFICATION PART 11! 

2087 







2088 





.-THIS 

TEST VERIFIES THAT A WRITE FUNCTION TO A N0N-EX1 STANT SECTOR WILL 

2089 





.PRODUCE AN ERROR AND A B-CODE OF 70. THE DELETED DATA BIT SHOULD ALSO BE CLEARED ! 

2090 





; T H 1 S 

SECTION TRANSFERS AN ILLEGAL SECTOR ADDRESS FOR A WRITE FUNCTION 

2091 





; NOTE TEST 14 NUST BE RUN BEFORE THIS TEST 

2092 







2095 

004776 

005000 



T16: 

C*_R RO 

2094 

005000 

005002 




CLR R2 

2095 

005002 

105737 

012752 



TSTB UN1TSEL ;WAS UNIT 0 SELECTED 

2096 

005006 

100004 




BPL 10$ 

2097 

005010 

012777 

000005 

174170 


NOV I5.3RXCS ; SET THE WRITE FUNCTION 

2098 

005016 

000403 




BR 11$ 

2099 

005020 

012777 

000025 

174160 

1 0 $ : 

NOV #25,iRXCS .-SEND WRITE FUNCTION TO UNIT 1 

2100 

005026 

004737 

005134 


11$: 

JSR PC , 1LLADR .SEND THE ILLEGAL ADDRESS 

2101 

005032 

000406 




BR 1$ ; PRENATURE ERROR CONDITION 

2102 

005034 

012700 

100040 



NOV I100040.R0 .EXPECT ERROR AND DONE BITS SET 

2103 

005040 

017701 

174142 



NOV 9RXCS.R' 

2104 

005044 

020001 




CNP R0.R1 

2105 

005046 

001401 




BEQ 2$ 

2106 







2107 





; RO 

= 100040 ; R1 - ACTUAL RXCS ; R2 = A OF TR FLAGS 

2108 







2109 

005050 

104000 



1$: 

ERROR 

2110 

005052 

104413 



2$: 

SUBSCOPE 

2111 







2112 





:T16 

CONT. - TESTS FOR NO PARITY. CRC ERRORS. AND NO DELETED DATA BIT 

2113 







2114 

005054 

005002 




CLR R2 

2115 

005056 

005000 




CLR RO ;N0 BITS SHOULD BE SET IN THE RXDB 

2116 

005060 

017701 

174124 



NOV 8RXDB.R1 

2117 

005064 

020001 




CNP R0.R1 

2118 

005066 

001401 




BEQ 3$ 

2119 







2120 





; RO 

= 0 ; R1 = ACTUAL RXDB ; R2 = N/A 

2121 

005070 

104000 




ERROR ; SONE BIT IS SET IN THE RXDB 

2122 

2123 

2124 

2125 

2126 

005072 

104413 



3$: 

SUBSCOPE 





; T 16 

CONT. - TEST FOR CORRECT B-CODE FOR ILLEGAL SECTOR ADDRESS 

005074 

012777 

000017 

174104 


NOV # 1 7 , 3R X C S ; SET READ STATUS 8 FUNCTION 

2127 

005102 

004737 

006622 


4$: 

JSR PC, SDN .-WAIT FOR DONE FLAG 

2128 

005106 

000775 




BR 4$ 

2129 

005110 

012700 

000070 



NOV #70, RO 

2130 

005114 

017701 

174070 



NOV 9RXDB.R1 

2131 

005120 

020001 




CNP R0.R1 ; IS B-CODE = 70 

2132 

2133 

2134 

005122 

001401 




BEQ 5$ ;YES. CONTINUE 





; RO 

= 70 ; R1 - ACTUAL RXDB ; R2 = N/A 

2135 

005124 

104000 




ERROR 

2136 

005126 

000004 



5 $: 

SCOPE 

2157 

005130 

000137 

004306 



JNP DEX1T ; END OF TEST 16 


CZRXBFO RX11 INTERFACE TEST 
CZRXBF .PIT 08-HAY-79 14:22 
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TEST 16 - ERROR FLAG AND B-CODE VERIFICATION PART III 


SEO 0077 


; GENERATE AN ILLEGAL SECTOR ADDRESS 


2141 

005134 

004737 

006606 

ILLADR: 

JSR PC.STR 

LOOK FOR A TR FLAG 

2142 

005140 

000402 



BR 2S 

NO TR FLAG, IS DONE SET 

2145 

005142 

005202 



INC R2 

TR FLAG COUNTER 

2144 

005144 

000404 



BR 3S 


2145 

005146 

004737 

006622 

2S: 

JSR PC, SDN 

LOOK FOR DONE FLAG 

2146 

005152 

000770 



BR ILLADR 

NOT DONE RECHECK TR FLAG 

214? 

005154 

000430 



BR IS 

DONE IS SET TOO EARLY GO TO ERROR 

2148 

005156 

005077 

174026 

3S: 

CLR 8RXDB 

0 SECTOR ADDRESS (ILLEGAL) 

2149 

005162 

004737 

006606 

7S: 

JSR PC.STR 

LOOK FOR SECOND TR FLAG 

2150 

005166 

000402 



BR 5S 

NOT TR, IS IT DONE 

2151 

005170 

005202 



INC R2 


2152 

005172 

000404 



BR 6S 

TR FLAG SEND TRACK ADDRESS 

2153 

005174 

004737 

006622 

5S: 

JSR PC. SDN 

LOOK FOR DONE FLAG 

2154 

005200 

000770 



BR 7S 

NOT DONE, RECHECK TR FLAG 

2155 

005202 

000415 



BR IS 

DONE TOO SOON GO TO ERROR 

2156 

005204 

005077 

174000 

6S: 

CLR 3RXDB 

SEND TRACK ADDRESS OF 0 

2157 

005210 

004737 

006606 

IIS: 

JSR PC.STR 

ARE THERE ANY MORE TR FLAGS 

2158 

005214 

000402 



BR 10S 

NO, LOOK FOR DONE 

2159 

005216 

005202 



INC R2 

YES 

2160 

005220 

000406 



BR IS 

TOO HANY TR FLAGS OR MICROCONTROLLER 

2161 




DID NOT DETECT THE ERROR 

2162 

005222 

004737 

006622 

1 0S: 

JSR PC. SDN 

LOOK FOR DONE FLAG 

2163 

005226 

000770 



BR IIS 

NOT DONE RETEST TR FLAo 

2164 

005230 

062716 

000002 


ADD #2. BSP 


2165 

005234 

000207 


4S: 

RTS PC 


2166 

005236 

017701 

173744 

IS: 

MOV BRXCS.R1 


2167 

005242 

000774 



BR 4S 
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2168 

2169 

2170 

2171 

2172 

2173 

2174 

2175 

2176 

2177 

2178 

2179 

2180 
2181 
2182 

2183 

2184 

2185 

2186 

2187 

2188 

2189 

2190 
219*. 
21V2 
2193 
21V4 

2195 

2196 

2197 

2198 

2199 

2200 
2201 
2202 

2203 

2204 

2205 

2206 
2207 
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TEST 16 - ERROR FLAG AND B-CODE VERIFICATION PART III 

. SBTTL TEST 17 - ILLEGAL track error verification 

.-THIS TEST VERIFIES THAT IF A TRACK ADDRESS LARGER THAN 114 (OCTAL) IS 
; ACCESSED, AN ERROR CONDITION WILL EXIST. AND A B-CODE WILL = 40 


SET READ FUNCTION 
LOOK FOR TR FLAG 
NO TR FLAG CHECK DONE 


SEQ 0078 


005244 

005002 



T 1 7: 

CLR R2 

005246 

005000 




CLR RO 

005250 

012777 

000007 

173730 


MOV I7.3RXCS 

005256 

004737 

006606 


31: 

JSR PC.STR 

005262 

000401 




BR IS 

005264 

000410 




BR 2S 

005266 

004737 

006622 


IS: 

JSR PC, SDN 

005272 

000771 




BR 3S 

005274 

017701 

173706 



NOV 3RXCS.R1 

005300 

017702 

173704 



NOV 3RXDB ,R2 

005304 

000433 




BR 4S 

005306 

012777 

000001 

173674 

2S: 

NOV I1.3RXDB 

005314 

004737 

006606 


5S: 

JSR PC.STR 

005320 

000401 




BR 6S 

005322 

000410 




BR 7S 

005324 

004737 

006622 


6S: 

JSR PC. SDN 

005330 

000771 




BR 5S 

005332 

017701 

173650 



NOV 3RXCS.R1 

005336 

017702 

1 73646 



NOV 3RXDB.R2 

005342 

000414 




BR 4S 

005344 

012777 

000115 

1 73636 

7S: 

NOV #1 15.3RXDB 

005352 

004737 

006622 


10S: 

JSR PC, SDN 

005356 

000775 




BR 10S 

005360 

012700 

100040 



NOV # 100040.RO 

005364 

017701 

173616 



NOV 3RXCS.R1 

005370 

020001 




CNP R0.R1 

005372 

001401 




BEQ US 


.-DONE OCCURRED TOO SOON SET UP FOR ERROR 


; SEND LEGAL SECTOR ADDRESS 
; LOOK FOR TR FLAG 


;DONE SET TOO EARLY 


.-SEND ILLEGAL TRACK ADDRESS 
.-WAIT FOR DONE ON THE ERROR 

.•EXPECT ERROR AND DONE SET 


; TWO ERROR CONDITIONS TO REPORT 

;1F RO = 0 THEN R1 = RXCS ;R2 = RXDB ON A DONE TOO SOON ERROR 
; IF RO * 100040 THEN R1 = ACTUAL RXCS ; R2 = N/A 


005374 104000 


4$: 


ERROR 


;D0NE SET TOO SOON OR NO ERROR OCCURRED 


THE FOLLOWING IS A PRESENTATION OF POSSIBLE REASONS AS TO WHY 
THIS ERROR REPORT WAS GENERATED. THE INFORMATION SHOWN IS 
BASED ON FAULT INSERTION RESULTS. AND SHOULD PROVIDE LOGICAL 
AREAS TO CHECK FOR THE RELEVANT FAULT/S. 

IF THIS ERROR REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS 
ANALYZE THE FOLLOWING AREA/S: 


N7846 (UNIBUS INTERFACE) 
SIGNAL NAME 


REASON 


POSSIBLE CHIPS 


CZRXBFO RX11 
CZRXBF .P1 1 


INTERFACE TEST 
08-NAY-79 14:22 
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TEST 17 - ILLEGAL TRACK ERROR VERIFICATION 


SEQ 0079 


INT EN8 FLOP CLOCK LOCKED HIGH E40 


;/: W: W: W: W: W: \*/:\*/:W: W:W: W: W: W: W: W: W:W:\* 
W: W: W: W: W: \*/: \*/:W: W: W: W: W: \*/:W- W: W: \*/:\* 


2231 

2232 

2233 
22 34 

2235 

2236 

2237 

2238 

2239 

2240 

2241 

2242 

2243 

2244 

2245 

2246 

2247 

2248 

2249 

2250 

2251 

2252 

2253 

2254 

2255 

2256 

2257 

2258 

2259 

2260 
2261 
2262 

2263 

2264 

2265 

2266 

2267 

2268 

2269 

2270 

2271 

2272 


005376 104413 


005400 005000 
005402 005002 
00540*. 017701 173600 

005410 020001 
005412 001401 


005414 104000 

005416 104413 


005420 012777 000017 173560 
005426 004737 006622 
005432 000775 
005434 005777 173546 

005440 100007 
005442 012700 000040 
005446 017701 173534 

005452 017702 173532 


005456 104000 

005460 104413 

005462 005002 
005464 012700 000040 

005470 017701 173514 

005474 020001 

005476 001401 


005500 104000 
005502 000004 
005504 000137 004306 


SUBSCOPE 

CONT. - TEST THAT THERE WERE NO OTHER ERRORS THAN THE ILLEGAL TRACK ERROR EXPECTED 
THAT THE DELETED DATA BIT WAS CLEARED BY TEST 16. 


CLR RO 
CLR R2 

NOV 3RXDB ,R1 
CMP R0.R1 
BEQ 12S 

= 0 ; R 1 = ACTUAL RXDB ; R2 = N/A 


ERROR 

SUBSCOPE 

CONT. - VERIFIES THAT READ STATUS B HAS NO ERRORS 


;DD BIT CLEARED IN TEST 16 SO RXDB - 0 


NOV H7.3RXCS 
JSR PC, SDN 
BR 13* 

TST 8RXCS 
BPL 14t 
NOV #40, RO 
NOV 9RXCS.R1 
NOV 8RXDB.R2 


; SET READ STATUS B FUNCTION 
.-WAIT FOR DONE FLAG 

;WAS THERE AN ERROR ON THIS FUNCTION 
;N0 


= 40 (DONE) ; R1 = ACTUAL RXCS ; R2 = ACTUAL RXDB 


ERROR 
SUBSCOPE 
CLR R2 
NOV #40, RO 
NOV 3RXDB.R1 
CNP R0,R1 
BEQ 15S 


.-THERE WAS AN ERROR NO READ STATUS B 


.-B-CODE FOR ILLEGAL TRACK ADDRESS 


;B-CODE IS CORRECT 


= 40 ; R1 =■ ACTUAL B-CODE ; R2 = N/A 


ERROR 
SCOPE 
JNP DEXIT 


.-END OF TEST 17 
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2273 

2274 

2275 

2276 

2277 

2278 

2279 

2280 
2281 
2282 
2283 
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SEQ 0080 


.SBTTL TEST 20 - SEEK VERIFICATION VIA READ FUNCTION 

THE PURPOSE OF THIS TEST IS TO DO A READ FUNCTION ON ALL 
SECTORS OF VARIOUS TRACKS ON THE DISKETTE. THIS WILL TEST FOR SEEK ERRORS 
FOR THOSE TRACK POSITIONS. UNLESS OTHERWISE SELECTED (IN OD/ID) THE TRACKS 
ACCESSED ARE 0 (OD). 52, 53 (BOTH SIDES OF THE WRITE CURRENT CHANGE). AND 114 (ID) 


005510 




IF THE DIAGNOSTIC GIVES AN ERROR REPORT WITH A FORMAT OF 
’TEST PC=’ WHERE THE ’PC' IS WITHIN THE RANGE OF THIS TEST 
THEN THE POSSIBLE CHIPS VERSUS THE ’B' CODE (INTERPRETIVE 
ERROR CODE) PRINTED ARE AS FOLLOWS: 


IF ’B' CODE WAS POSSIBLE CHIPS 

120 E5.E6 

150 E13.E14.E16.E17 

200 E5.E6 

/:\*/:\*/:\*/:\*/:\*/:\*/:W:W:\*/:\*/:\*/:W:\*/:\*/:\*/:\*/:\*/:\* 
/: \*/: W :\*/: W: W: W: W: W: W: W: W: W: W: W: W: W: W:\* 
/: W: W : W: W: W: \*/: W: W: W: W: W: W: W: W: W: W: W:\* 


2305 

2306 

2307 

2308 

2309 

2310 

2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 


005510 

005514 

005520 

005524 

005530 


013702 

012722 

012722 

004737 

000137 


001204 

011554 

000340 

007010 

004306 


MOV KRXVEC.R2 
MOV #1NTSERV.(R2>* 
MOV #PR7.(R2)* 

J SR PC.RDONLY 
JMP DEXIT 


;SET UP INTERRUPT ADDRESSES 


;D0 THE READ FUNCTION 
;END OF TEST 20 


005534 

005542 

005550 

005554 

005562 

005566 

005572 

005574 

005602 

005606 

005610 

00*614 


012737 

012737 

004737 

012737 

004737 

004737 

005002 

012777 

004737 

000404 

•112077 

005202 


000001 013154 

000001 013444 

012662 

000001 012352 

012306 

011014 

000001 173404 

004112 

173374 


.SBTTL TEST 21 - WRITE TEST 

;THE PURPOSE OF THIS TEST IS TO WRITE ALL ONES ON SECTOR 1 TRACK 1. 

; AND VERIFY THAT THE DATA IN THE SECTOR BUFFER iS NOT MODIFIED. 

T21 : MOV #1, TARGET 

MOV #1 . TSECTOR 
JSR PC.GETUNIT 
MOV #1 .PAT 
JSR PC .GETPATTERN 
JSR PC , ADJSUM ; SET CHECK SUM VALUES 

CLR R2 

MOV #1 .3RXCS .-SET FILL BUFFER FUNCTION 

IS: JSR PC.FBEB 

BR 2S 

- HOVB ( RO ) •*• .3RXDB - 

INC R2 
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CZRXBf . 

PIT Q8-NAT-79 

14:22 


TEST 21 

- WRITE TEST 



SEQ 0081 

2329 

003616 

000771 




BR 14 




2330 

003620 

012737 

000005 

007730 

24: 

nov #5,fukm;on 

; SET 

WRITE FUNCTION 


2331 

003626 

004737 

005636 



JSR PC.T21X 

; GO 

ISSUE the cowhand 


2332 

003632 

000137 

004306 



J1P 0EX1T 

; END 

OF TEST 21 
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2533 

2334 

2335 

2336 

2337 

2338 

2339 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 


005636 

005642 

005646 

005650 

005654 

005656 

005662 

005670 

005674 

005676 


004737 

004737 

000775 

005777 

100013 

017701 

012777 

004737 

000775 

017702 


007662 

006622 

173332 

173326 
00001 7 
006622 

173306 
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TEST 21 - WRITE TEST 

T 2 1 X : JSR PC.COMNWGRD 

3S: JSR PC. SDN 

BR 3S 
T ST 3RXCS 
BPL 41 
MOV BRXDB.RI 

173316 MOV #17,aRXCS 

5$: JSR PC. SDN 

BR 51 

NO V 3RXDB.R2 


SEQ 0082 


IS THE ERROR BIT SET 
NO ERRORS 
SAVE STATUS A 

SET READ STATUS B FUNCTION 


; SAVE STATUS B 


005702 104000 


;R0 = ADDR OF LAST DATA BYTE ; R1 = STATUS A ; R2 = STATUS B 
ERROR 


; IF THE FAULT CANNOT BE FOUND ON THE UNIBUS INTERFACE NODULE 
; AND/OR THE FAULT IS NOT INHERENT TO THE UNIBUS INTERFACE MODULE 
;M7846 THERE IS A POSSIBILITY OF ITS EXISTENCE ON THE READ/WRITE 
; NODULE N7727. 

NOTE: ONLY APPROX. 30X OF THIS NODULE LENT ITSELF CONDUCIVE TO 

THE FAULT INSERTION PROCESS; ERGO. THE RESOLUTION FOR FAULT 
ANALYSIS OBTAINABLE BY THIS NODULE IS NOT VERY HIGH. 
HOWEVER. ANALYSIS OF THE FOLLOWING AREA/S. IF THIS ERROR 
REPORT WAS THE 1ST GIVEN IN A SERIES OF ERRORS, SHOULD AT 
LEAST PLACE YOU WITHIN THE RELEVANT AREA ON THE NODULE. 


N 7727 (READ/WRITE CONTROL) 


SIGNAL NANE 


REASON 


POSSIBLE CHIPS 


WT DATA 
WT GATE 


STUCK LOW/HIGH 
STUCK LOW 


/:W:W:W:W:W:W:W:W:W:W:W:W:W:\*/:W:W:W:\* 
/:W: \*/: W: W: W: W: W: W: W: W: W: W: W: W: W: W: \*/:\* 
/:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:W:\* 


2376 005704 104413 

2377 005706 005000 

2378 005710 005001 

2379 005712 004737 004200 

2380 005716 000207 


SUBSCOPE 
CLR RO 
CLR R1 

JSR PC , T 7ENPT Y 
RTS PC 


; EHPT Y BUFFER AND CHECK CONTENTS 


CZRXBFO R X 1 1 INTERFACE TEST 
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2381 

2382 

2383 

2384 , 

2385 

2386 

2387 

2388 

2389 005720 

2390 00572A 

2391 005726 

2392 005732 

2393 005736 
2 394, 00 5 74,2 
2 3 9 5 0 0 5 74,6 

2396 005752 

2397 005760 

2398 0 0 5 764, 

2399 005766 

2400 005772 

24.01 

24.02 

24.03 
24,04, 

24.05 

24.06 

24.07 

2408 005776 

24.09 006002 

24.10 006006 

24.11 006012 

24.12 006016 

24.13 006022 

24.U 006026 

24.15 0 0 6 034, 

24.16 00604,0 


105737 012752 

100022 

005037 012352 

004.737 004.054, 
005237 012352 

004.737 012306 
004,737 OllOH 
052777 04,0001 
004737 006622 
000775 

004737 004200 

000137 004306 


005037 012352 
004737 004054 
005237 012352 
004737 012662 
004737 012306 
004737 011014 
012737 000007 
004737 005636 
000137 004306 
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•SBTTl TEST 22 - INITIALIZE IMPLIED READ 
AFTER PREVIOUSLY WRITING A PATTERN ON SECTOR 1 TRACK 1. THIS TEST 
CHANGES THE CONTENTS OF THE SECTOR BUFFER AND DOES A PROGRAMMED INITIALIZE 
AFTER WHICH THE SECTOR BUFFER MUST AGAIN CONTAIN THE DATA PREVIOUSLY 
WRITTEN ON THAT SECTOR AND TRACK. 

NOTE: THIS TEST WILL ONLY WORK IF UNIT 0 IS SELECTED AND ON LINE. 


SEQ 0083 


T 22 : 


173226 


1 i : 

2 $: 


TSTB UN1TSEL 
BPL 21 
CLR pat 
JSR PC ,T6F ILL 
INC PAT 

JSR PC.GETPATTERN 
JSR PC , ADJSUH 
BIS IFRECAL .BRXCS 
JSR PC. SDN 
BR IS 

JSR PC.T7EMPTY 
JMP DEX1T 


.SBTTL TEST 23 - READ TEST 


; 1 F UNIT 0 IS NOT SELECTED SKIP THIS TEST 


; LOAD THE SECTOR BUFFER WITH 0 
.•RELOAD CORE BUFFER WITH 1'S 


; SE T THE 1NIT. BIT 


.-EMPTY THE SECTOR BUFFER AND CHECK IT, 
;END OF TEST 22 


.-THIS TEST VERIFIES THAT A READ FUNCTION DOES IN FACT LOAD THE SECTOR 
;BUF FER WITH DATA READ FROM THE SELECTED ADDRESS. 


007730 


T 2 3 : CLR PAT 

JSR PC .T6F ILL 
INC PAT 

JSR PC .GETUN1T 
JSR PC.GETPATTERN 
JSR PC .ADJSUH 
MOV 97 . FUNCTION 
JSR PC.T21X 
JMP DEX1T 


; LOAD SECTOR BUFFER WITH 0*S 


RELOAD CORE BUFFER WITH 1'S 

SET UP FOR CHECK SUM 

SET READ FUNCTION AND GO 

ISSUE COMMAND. WAIT FGR DONE.* TEST DATA 

END OF TEST 23 
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C ZRXBF 

P11 

08-NAY-79 

14:22 

TEST 23 - READ TEST 


2417 







2418 





. SBTTL TEST 24 - DATA TRANSFER AND 

VERIFICATION 

2419 







2420 





; THE purpose of this test is to write then 

READ AND VERIFY DATA 

2421 





ON ALL SECTORS OF THE SELECTED TRACKS. THE TEST ALTERNATES BETWEEN 

2422 





: DR IVES ON THE SELECTED TRACKS. DATA PATTERN IS A FLOATING 0. 

2423 







2424 

006044 

012737 

000002 

012352 T24: NOV #2. PAT 

; SE 1 DATA PATTERN TO FLOATING 

2425 

006052 

013702 

001204 

T24X: NOV KRXVEC.R2 

.SET INTERRUPT ADDRESSE S 

2426 

006056 

012722 

011554 


NOV UNTSERV, (R2) ♦ 


2427 

00606? 

012712 

000340 


NOV #PR7.(R2) 


2428 

006066 

004737 

007040 


JSR PC.DRVSWP 

; GO TRANSFER THE DATA 

2429 

006072 

000137 

004306 


JNP DEX1T 

.END OF TEST 24 OR 25 

2430 







2431 







2432 





.SBTTL TEST 25 - DATA TRANSFER AND 

VERIFICATION VIA DELETED DATA NODE 

2433 







2434 





THIS TEST TRANSFERES DATA JUST LIKE TEST 

24 EXCEPT IT USES The 

2435 





DELETED DATA FORNAT AND A DATA PATTERN OF 

FLOATING 1. 

2436 







2437 

006076 

012737 

000003 

012352 T 25 : NOV #3, PAT 

;SET DATA PATTERN TO FLOATING 

2438 

006104 

000137 

006052 


JNP T24X 

;G0 TRANSFER THE DATA 

2439 







2440 





.SBTTL TEST 26 - HEAD "HONE" TEST 


2441 







2442 





THIS TEST NOVES THE HEAD OUT TO TRACK 12 

(OCTAL) AND THEN WRITES/READ CHECKS 

2443 





ALL SECTORS (RANDON DATA) ON EACH TRACK. 

THE TRACK SEQUENCE 

2444 





IS DECRENENT ; >ED BACK TO TRACK 0 IHONE ) . 

AFTER CONPLETING 

2445 





DRIVE 0 IT SWITCHES OVER TO DRIVE 1 DOING 

THE SANE TEST. 

2446 







244 7 







2448 

006110 

052737 

000200 

013164 T 26 : BIS #B1T7,SEQUEN 

; SPECIAL DECRENENT SEQUENCE 

2449 

006116 

012737 

000007 

012352 

NOV 07, PAT 

; SELECT RANDON DATA 

2450 

006124 

013702 

001204 


NOV KRXVEC ,R2 


2451 

006130 

012722 

011554 


NOV UNTSERV, (R2) ♦ 


2452 

006134 

012712 

000340 


NOV #PR7,(R2) 


2453 

006140 

004737 

007114 


JSR PC.WTRDCK 


2454 

006144 

042737 

000200 

013164 

BIC #8117, SEQUEN 


2455 

006152 

000137 

004306 


JNP DEXIT 

;END OF TEST 26 


SEQ 008<. 
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CZRXBF.P11 08-HAY-79 14:22 TEST 26 - MEAD • , MOME“ TEST SEO 0085 


2456 


2457 


2458 


2459 


2460 

006156 

2461 


2462 

006162 

2465 


2464 

006164 

2465 

006166 

2466 

006167 

2467 

006170 

2468 

006174 

2469 


2470 

006200 

2471 


2472 


2475 


24 74 


2475 


24 76 

006202 

2477 


2478 


24 79 

006206 

2480 


2481 

006210 

2482 

006212 

2485 

006213 

2484 

006214 

2485 

006220 

2486 


2487 

006224 

2488 


2489 


2490 


2491 


2492 

006226 

2495 


2494 

006252 

2495 


2496 

006234 

2497 

006236 

2498 


2499 

006240 

2:0 0 

006242 

2501 

006244 

2502 

006246 

2505 

006250 

2504 

006252 

2505 


2506 

006256 

2507 



; THE FOLLOWING SECTION Of CODE WILL ALLOW PROVIDING INFORMATION 
; TO THE USER WHEN AN ’UNEXPECTED' BUS TIMEOUT TO LOCATION 4 OCCURS 


104401 

01^007 

BUSERR: 

TYPE. 

L0C4M 


TYPE MESSAGE INDICATING AN 






.•UNEXPECTED BUS TIMEOUT OCCURRED 

012646 



MOV 

(SP)* .-(SP) 

; ; SAVE (SP) ♦ FOR TyPEOUT 






; ; SETUP TO TYPE PC WHERE TIMEOUT OCCURRED 

104405 



TYPOS 


; ;G0 TYPE 

—OCTAL ASCII 

006 



• BYTE 

6 

; ; TYPE 6 

DIGITS 

000 



.BYTE 

0 

; ; SUPPRESS LEADING ZEROS 

104401 

017122 


TYPE. 

PCM 


TYPE MESSAGE ’=PC 

012716 

002504 


MOV 

AREBEGIN, ( SP) 


SET RETURN 'PC’ TO START THE 







PROGRAM OVER AGAIN 

000002 



RT1 



RETURN TO BEGINNING OF PROGRAM 



: THE following 

SECTION OF CODE 

WILL ALLOW PROVIDING INFORMATION 



; TO THE 

USER WHEN AN ’UNEXPECTED' RESERVED INSTRUCTION TRAP TO LOCATION 



; 10 OCCURS 




104401 

017054 

RESERR: 

TYPE. 

LOCI OM 


TYPE MESSAGE INDICATING AN 







UNEXPECTED RESERVED INSTRUCTION 







TRAP OCCURRED 

012646 



MOV 

(SP)*,-(SP) 

; ; SAVE (SP)* FOR TYPEOUT 






; ; SETUP TO TYPE PC WHERE RESERVED TRAP OCCURRED 

104403 



TYPOS 


; ;G0 TYPE— OCTAL ASCII 

006 



.BYTE 

6 

; ; T YPE 6 

DIGITS 

000 



• BYTE 

0 

;; SUPPRESS LEADING ZEROS 

104401 

017122 


TYPE, 

PCM 


TYPE MESSAGE '=PC' 

012716 

002504 


MOV 

IREBEG1N, ( SP) 


SET RETURN 'PC' TO START THE 







PROGRAM OVER AGAIN 

000002 



RTI 



RETURN TO BEGINNING OF PROGRAM 



;TH1S ROUTINE 

WILL CALCULATE THE PRIORITY LEVEL FOR THE PROCESSOR 



;8ASED 

ON THE 

CURRENT PRIORITY 

LEVEL OF THE DEVICE (CONTENTS OF BRLE V: ) 

013700 

001214 

CPUPRI : 

MOV 

BRLEV.RO 


GET THE PROPOSED RX11 DEVICE 







INTERRUPT PRIORITY LEVEL VALUE 

105701 



TSTB 

R1 


IS CPU LEVEL TO BE THE SAME AS 







THE DEVICE LEVEL OR 1 LESS? 

100401 



BM1 

IS 


BRANCH IF SAME AS! 

005500 



DEC 

RO 


DROP DEVICE LEVEL PRIORITY 







BY 1 level for psw 

006300 


IS: 

ASL 

RO 


FORM BITS <7-5> FOR PSW 

006300 



ASL 

RO 


. 

006300 



ASL 

RO 


. 

006300 



ASL 

RO 


• 

006300 



ASL 

RO 


• 

042700 

000057 


B1C 

#57, RO 


ENSURE THAT T.N.Z.V. & C BPS 







for the processor arf clear 

000207 



RTS 

PC 


RETURN TO MAINLINE CODE 


I 
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CZRXBF.P11 08-NAY-79 U:22 " ERROR *' TRAP SERVICE ROUTINE SEQ 0086 

2508 .SBTTl •' ERROR " TRAP SERVICE ROUTINE 

2509 

2510 ........t............. 

251 1 

2512 

2515 ; ** ERROR " 

25U 

2515 ;; * 

2516 


2318 

006260 

011637 

006522 


XERROR: 

: NOV 3 SP, E PC SCOPE 

; RETURN ADDRESS fRON " ERROR" 

2519 

006264 

062737 

000002 

006522 


ADD *2. EPCSCOPE 

; NOW (EPCSCOPE) = SU8SC0PE«2. OR SCOPE *2 

2520 

006272 

005237 

006520 


INCERRORS: INC ERRORS 


2521 

006276 

001775 




BEQ 1NCERR0RS 


2522 








2525 





; DATA 

SW 13 = 0 TO PRINT APPROPRIATE 

ERROR NESSAGE 

2524 








2525 

006500 

104406 




CKSWR 


2526 

006502 

032777 

020000 

172706 


BIT «sui3,aswR 


2527 

006310 

001056 




BNE NOPRINT 


2528 

006312 

005037 

002554 



ClR C COUNT 


2529 

006316 

032737 

000400 

012752 


BIT #BIT8.UN1TSEL 

; WAS PREVIOUS ERROR REPORTED ON THIS PASS 

2550 

006524 

001002 




BNE IS 


2551 

006326 

104401 

015700 



TYPE. HXEHEADER 


2552 








2555 

006332 

104401 

016162 


IS: 

TYPE. NCRLF 


2554 

006536 

011604 




NOV a SP. R4 

; ERADR 

2555 

006340 

162704 

000002 



SUB #2, R4 


2556 

006344 

010446 




NOV R4 , -(SP) 


2557 

006346 

104403 




TYPOS 


2558 

006550 

006 




.BYTE 6 


2559 

006351 

001 




.BYTE 1 


2540 

006352 

104401 

016703 



TYPE. SPACE 


2541 

006356 

013746 

002560 



NOV FAST. -(SP) 

; FAST (FIRST ADDRESS OF SELCCTED TEST) 

2542 

006362 

104404 




TYPON 


2545 

006364 

104401 

016703 



TYPE. SPACE 

; F APT (FIRST ADDRESS OF PRESENT TEST) 

2544 

006370 

013746 

006604 



NOV PCSCOPE . -(SP) 

2545 

006374 

104404 




TYPON 


2546 

006376 

104401 

016703 



TYPE, SPACE 


2547 

006402 

010246 




NOV R2, -(SP) 

; BLANK 

2548 

006404 

104404 




TYPON 


2549 

006406 

104401 

016703 



TYPE. SPACE 

; EXPECTED (GOOD) RESULT OF TEST 

2550 

006412 

010046 




NOV RO, -(SP) 

2551 

006414 

104404 




TYPON 


2552 

006416 

104401 

016703 



TYPE. SPACE 

; ACTUAL (BAD) RESULT OF TEST 

2555 

006422 

010146 




NOV R1 , -(SP) 

2554 

006424 

104404 




TYPON 


2555 

006426 

If -.401 

016703 



TYPE., SPACE 


2556 

006432 

013737 

002556 

006444 


NOV PASS.2S 


2557 

006440 

004537 

015642 



j SR R5 . SGlDE C 


2558 

006444 

000000 



2S : 

OPEN 




seo 0087 


;SET HARD ERROR FLAG 


; DING - A - LING 


006524 

006550 


005737 006520 

001015 


CZRXBFO RX11 INTERFACE TEST 
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2585 

2584 

2585 

2586 

2587 

2588 

2589 

2590 

2591 

2592 
2595 

2594 

2595 

2596 

2597 

2598 

2599 

2600 
2601 
2602 

2603 

2604 

2605 

2606 

2607 

2608 

2609 

2610 
2611 
2612 
2615 

2614 

2615 

2616 

2617 

2618 

2619 

2620 
2621 
2622 

2623 

2624 

2625 

2626 
2627 


006552 

006556 

006542 


006544 

006550 

006552 


005037 006520 
011657 006604 
000002 


005737 006520 
001001 
000002 


006554 

006560 

006562 


021657 006522 

001401 

000002 


006564 

006566 

006574 

006576 

006602 

006604 


MAC Y 1 1 50AU052) 29-NAY-79 08:25 PAGE 60 

" SCOPE " TRAP SERVICE ROUTINE 

.SBTTl " SCOPE " TRAP SERVICE ROUTINE 


SEQ 0088 


104406 

052777 004000 

001756 

013716 006604 
000002 
000000 


SCOPE 


XSCOPE : TST ERRORS 
BNE SCOPING 


; NO ERRORS HAVE BEEN DETECTED 

; JUST SET (PCSCOPE) = FIRST ADDRESS OF THE SCOPE LOOP 

; UN CASE ERRORS ARE DETECTED LATER) 

NOSCOPE: CLR ERRORS 

NOV a SP. PCSCOPE 
RTI 


SUBSCOPE 


XSUBSCOPE: TST ERRORS 
BNE U 
RTI 

; ERRORS DO EXIST 


; NO ERRORS EXIST 


172422 


; IF THIS ERROR ADDRESS IS THE SANE ADDRESS WITHIN PROGRAN LOCATION ” EPCSCOPE* 

; THEN THIS IS A SCOPING LOOP 

; IF NOT - THEN EXIT 

1$: CNP 3 SP. EPCSCOPE 

BEQ SCOPING 
RTI 

; SW 1 1 = 1 TO LOCK ON SCOPING LOOP 

; THIS IS A SCOPING LOOP 

SCOPING: CKSUR 

BIT ISWll.aSWR 

BEQ NOSCOPE ; 00 NOT LOOP ON ERROR 

NOV PCSCOPE. a SP 

RTI ; LOCK FOR SCOPE LOOP 

PCSCOPE: 0 
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2628 

2629 

2650 

2651 

2652 
2655 

2654 

2655 

2656 

2657 

2658 

2659 

2640 

2641 

2642 
2645 

2644 

2645 

2646 

2647 

2648 


MAC T 1 1 30A ( 1 052 ) 
" SCOPE ‘ 


L 7 

29-NAY-79 08:25 PAGE 61 
TRAP SERVICE ROUTINE 






; WAIT 

FOR TRANSFER REQUE! 

006606 

105777 

172574 


STR: 

T STB a RXCS 

006612 

100002 




BPL RTSPC 

006614 

062716 

000002 



ADD #2, a SP 

006620 

000207 



RTSPC : 

RTS PC 





; WAIT 

FOR THE DONE FLAG 

006622 

052777 

000040 

172556 

SDN: 

BIT IVBIT5, a RXCS 

006650 

001055 




BNE XSDN 

006652 

062757 

000001 

007004 


ADD #1. HANGER 

006640 

005557 

007006 



ADC HANGPL 

006644 

001401 




BEQ HUNGUP 

006646 

000207 




RTS PC 


SET 


ADJUST FOR EXIT 


TEST THE DONE BIT » 5 


006650 104000 


; THE DEVICE TEST IS HUNG - DONE HAS NOT SET 
; IRO) = N/A ; (R1) = N/A ; (R2) = N/A 
HUNGUP: ERROR 


; IF THE DIAGNOSTIC HITS THIS ERROR REPORT AND THE 'HUNG 9 PC' 
; LOCATION IS WITHIN ONE OF THE TESTS TABULATED BELOW THEN THE 
; POSSIBLE CHIPS ARE AS FOLLOWS: 


HUNG 9 TEST 

TEST 5 ( PART 1 ) 
TEST 5 ( PART 2 ) 
TEST 6 


POSSIBLE CHIPS 

E7,E54,E4,E22,E15,E1,E11,E57 
E7.E54,E2,E14,E6,E1,E57,E8 
E4.E15.E1 .E19.E18.E22 


/:W:\*/:W:\*/:W:\*/:W:W:W:W:W:W:W:W:W:W:W:\* 
/:W:W:W:W:W:\*/:W:W:W:W:W:W:\*/:W:W:W:W:\* 
/: W: \*/:W: W: W: W: W: W: \*/: W: W: W: \*/: W: W: W: W:\* 


2668 






2669 

006652 

005057 

007004 


CLR HANGER 

2670 

006656 

012757 

177740 

007006 

NOV #1 77740, HANGPL 

2671 

006664 

104406 



CKSWR 

2672 

006666 

052777 

020000 

172522 

BIT *SWl5,aSWR 

2675 

006674 

001402 



BEQ IS 

2674 

006676 

000157 

002200 


JNP NORETESTS 

2675 

006702 

104401 

006722 


IS: TYPE. NHUNGPC 

2676 






2677 





; THE PC IS ALREADY ON THE 

2678 






2679 

006706 

162716 

000002 


SUB 12, a SP 

2680 

00671? 

104405 



TYPOS 

2681 

006714 

006 



.BYTE 6 

2682 

006715 

001 



.BYTE 1 

2685 

006716 

000157 

002200 


JNP NORETESTS 


; RE SE T THE HANG COUNTERS 
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2684 

2685 006722 005015 042504 044526 NHUNGPC: .ASCIZ < 1 5>< 1 2>**DE V 1 CE TEST HUNG i PC M 

2686 006730 042503 052040 051505 

2687 006736 020124 052510 043516 

2688 006744 040040 050040 020103 

2689 006752 000 

2690 006753 040 040520 051523 MPASS: .ASCIZ " PASS =" 

2691 006760 036440 000 

2692 006764 .EVEN 

2693 

2694 006764 005037 007004 XSDN: ClR HANGER 

2695 006770 012737 177740 007006 MOV SI 77740. HANGPl 

2696 006776 062716 000002 ADO »2. 3 SP ; UPDATE FOR EXIT 

2697 007002 000207 RTS PC 

2698 007004 000000 HANGER: 0 

2699 007006 177740 HANGPL : 177740 


007010 

0070H 

007020 

00702*. 

007030 

007034 

007036 


004737 

004737 

004737 

004737 

005337 

001371 

000207 


007040 

007044 

007050 

007054 

007060 

007064 

007070 

007074 

007100 

007104 

007110 

007112 


004737 

004737 

004737 

004737 

004737 

004737 

004737 

004737 

004737 

005337 

001357 

000207 


007114 

007120 

007124 

007130 

007134 

007140 

007144 

007150 

007152 

007156 

007160 


013000 

012662 

013132 

010042 

013152 


CZRXBfO RXl 1 INTERf ACE TEST 
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2700 

2701 

2702 

2703 

2704 

2705 

2706 
27 r 
2706 

2709 

2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

2720 

2721 

2722 

2723 

2724 

2725 

2726 

2727 

2728 

2729 

2730 

2731 

2732 

2733 

2734 

2735 

2736 

2737 

2738 

2739 

2740 

2741 

2742 

2743 

2744 

2745 

2746 


004737 

004737 

004737 

004737 

004737 

004737 

005337 

001367 

004737 

000207 

000757 
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DRIVE TEST SELECTION 

.SBTTL DRIVE TEST SELECTION 


SEO 0091 


012306 

013000 

012662 

013132 

007162 

010662 

012662 

007162 

010662 

013152 


012306 

013000 

012662 

013132 

007162 

010662 

013152 

012754 


RDONLY : 


DRVSUP: 


; DO A READ ONLY F UNCT ION ON ALL SECTORS. 

; THIS DOES NOT VERIFY THE DATA. ONLY TESTS FOR CRC ERRORS. 

JSR PC , 1N1TTRACKS 
j SR PC.GETUNIT 
JSR PC.GETTRACK 
JSR PC. READ 
DEC TRKCNTR 
BNE 1$ 

RTS PC 


;URITE AND READ DATA ON SPECIFIED TRACK AND ALTERNATE 
; DRIVES BEFORE GOING TO THE NEXT TRACK. 

JSR PC.GETPATTERN 
JSR PC , 1NITTRACKS 
JSR PC.GETUNIT 
JSR PC.GETTRACK 
JSR PC .WRITE 
JSR PC .READCHK 
JSR PC.GETUNIT 
JSR PC, WRITE 
JSR PC, READCHK 
DEC TRKCNTR 
BNE IS 
RTS PC 


; WRITE ALL SECTORS AND READ/VERIFY ALL SECTORS 


WTRDCK : 
XWTRDCK : 


JSR PC.GETPATTERN 
JSR PC.1N1TTRACKS 
JSR PC.GETUNIT 
JSR PC.GETTRACK 
JSR PC, WRITE 
JSR PC, READCHK 
DEC TRKCNTR 
BNE IS 
JSR PC. DONE 
RTS PC 
BR XWTRDCK 


.-HAVE BOTH DRIVES BEEN TESTED 
; YES 

; NO , GO TO OTHER UNIT 
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CZRXBF.P11 08-HAY-79 14:22 WRITE FUNCTION 


2747 

2748 


2749 

007162 

004737 

013352 


2750 

007166 

004737 

013450 


2751 

007172 

004737 

011014 


2752 

007176 

012746 

007360 


2753 

007202 

012746 

007250 


2754 

007206 

005037 

011500 


2755 

007212 

005046 



2756 

007214 

012746 

007222 


2757 

007220 

000002 



2758 

007222 

012777 

000101 

171756 

2759 

007230 

105777 

171752 


2760 

007234 

100375 



2761 

007236 

112077 

171746 


2762 

007242 

005237 

011500 


2763 

007246 

000770 



2764 





2765 

007250 

005726 



2766 

007252 

012737 

016430 

007314 

2767 

007260 

012737 

007166 

007356 

2768 

007266 

012737 

007172 

007352 

2769 

007274 

000137 

007300 


2770 





2771 

007300 

104406 



2772 

007302 

032777 

020000 

171706 

2773 

007310 

001006 



2774 

007312 

104401 

000000 


2775 

007316 

104401 

016641 


2776 

007322 

104401 

016162 


2777 

007326 

104406 



2778 

007330 

005777 

171662 


2779 

007334 

100001 



2780 

007336 

000000 



2781 

007340 

032777 

004000 

171650 

2782 

007346 

001402 



2783 

007350 

000137 

007172 


2784 

007354 

000137 

010160 


2785 





2786 

007360 

005037 

007004 


2787 

007364 

012746 

007456 


2788 

007370 

012746 

007472 


2789 

007374 

112737 

000105 

007730 

2790 

007402 

022737 

006076 

006604 

2791 

007410 

001003 


007730 

2792 

007412 

112737 

000115 

2793 

007420 

004737 

007662 


2794 

007424 

005046 



2795 

007426 

012746 

007434 


2796 

007432 

000002 


171544 

2797 

007434 

032777 

000040 

2798 

007442 

001 77 4 



2799 

007444 

005237 

007004 


2800 

007450 

001375 



2801 

007452 

000137 

011510 



•SBTTL 

WRITE FUNCTION 

WRITE: 

JSR PC, 1NITSECT0R 

XWR1TE: 

JSR PC.GETSECTOR 

FILLBUF : 

JSR PC , ADJSUM 

MOV IF lLLDONE ,-(SP) 
MOV IFILLER.-(SP) 

CLR BYTECNTR 

CLR 

-(SP) 

MOV 

I1S,-(SP) 

RTI 

IS: 

MOV IFBIE.BRXCS 

F1LLFLAG: 

TSTB BRXCS 

BPL F1LLFLAG 

XFRBYTE: 

MOVB (R0)+.3RXDB 

INC BYTECNTR 

BR FILLFLAG 

FILLER: 

TST ISP)* 

MOV IMF 1L,PTYP1*2 

MOV IXWRITE , PCONT *2 
MOV IF1LLBUF .PLOOP+2 
JMP PARTEST 

PARTEST: 

CKSWR 

BIT ISW13.3SWR 

BNE C0NT4 

PTYP1 : 

TYPE .OPEN 

TYPE .MPAR 

TYPE ,MCRLF 

C0NT4: 

CKSWR 

TST aswR 

BPL CONTI 3 

HLT6: 

HALT 

C0NT13: 

BIT iswii.aswR 

BEQ PCONT 

PLOOP: 

JMP FILLBUF 

PCONT: 

JMP NEXTRD 

F 1LLD0NE : 

CLR HANGER 

MOV IWRTDONE.-(SP) 

MOV IWRTER.-(SP) 

MOVB IWRTIE, FUNCTION 
CMP IT25.PCSCOPE 

BNE IS 

MOVB IWTDDIE. FUNCTION 

IS: 

JSR PC.COMMWORD 

CLR 

-(SP) 

MOV 

I2S,-(SP) 

RTI 

2S: 

BIT ID0NEB1T ,8RXCS 

BEQ 2S 

3S : 

INC HANGER 

BNE 3S 

JMP N0IN1ER 


SEQ 0092 


SET UP FIRST, LAST, AND SECTOR COUNTER 
PICK UP NEXT SECTOR 

ADJUST DATA BUFFER A‘!D CHECK SUN FOR ADDRESSES 
PUT GOOD RETURNON STACK 
PUT ERROR RETURN ON STACK 

LOWER ’CPU* LEVEL 
SET RETURN 'PC’ 

GET 'CPU* LEVEL INTO 'PSW 
EXECUTE F1LLBUFER COMMAND 
TEST FOR TRANSFER REQUES1 FLAG 

TRANSFER DATA BYTE 

WAIT FOR NEXT TR FLAG 

REMOVE THE DONE RETURN FROM THE STACK 

PUT ADDR OF FILLBUF MESSAGE IN PAR ERR TYPOUT 1 

IF NO LOOP ON ERROR GO TO NEXT SECTOR 

IF LOOP ON ERROR RETURN THROUGH PLOOP 

PRINT OUT PAR ERR AND TEST CONDITIONS FOR RETRY 


.-TEST DON’T PRINT ERROR SWITCH 
;PRINT THE PARITY ERROR MESSAGE 


.-TEST HALT ON ERROR SWITCH 

;HALT ON ERROR 
; TEST LOOP ON ERROR SWITCH 
; IF NOT SET GO TO NEXT SECTOR 
;RETURN TO LOOP ON TEST THROUGH HERE 
;G0 TO NEXT SECTOR THROUGH HERE 


SET GOOD RETURN ON STACK 
SET ERROR RETURN ON STACK 
SET FUNCTION WORD TO WRITE 
IS THIS THE DELETED DATA TEST 


; TRANSFER COMMAND TO DRIVE 
.LOWER 'CPU' LEVEL 
; SET RETURN 'PC’ 

.GET ’CPU* LEVEL INTO 'PSW* 
.-WAIT FOR DONE 

;WAIT FOR INTERRUPT 

; NO INTERRUPT ERROR 
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WRITE FUNCTION 


SFQ 0093 


2802 

2803 

2804 

2805 

2806 

2807 

2808 

2809 

2810 
2811 
2812 

2813 

2814 

2815 

2816 

2817 

2818 

2819 

2820 
2821 
2822 

2823 

2824 

2825 

2826 

2827 

2828 

2829 

2830 

2831 

2832 

2833 

2834 

2835 

2836 

2837 

2838 

2839 

2840 

2841 

2842 

2843 

2844 

2845 

2846 
284? 

2848 

2849 

2850 


007456 

007462 

007464 

007466 

007472 

007474 

007502 

007504 

007512 

007520 

007526 


005337 

001001 

000207 

000137 

005726 

032737 

001413 

012737 

012737 

012737 

000137 


013442 


007166 


000002 012174 


URTDONE : 


URTER: 


DEC SECCNTR 
BNE 2t 
RTS PC 
JMP XWRITE 


.-TEST SECTOR COUNTER 
; NOT LAST SECTOR GO TO NEXT ONE 


016632 

007456 

007360 

007300 


007314 

007356 

007352 


TST (SP)+ ; REMOVE THE DONE RETURN FROM THE STACK 

BIT IB1T1.ASTAT ;IS THIS A PARITY ERROR 

BEQ WRTSEK ;N0, IT MUST BE A SEEK ERROR 

; PARITY ERROR DURING A WRITE FUNCTION 


MOV #MWRITE,PTYP1*2 
MOV IWRTDONE .PCONT+2 
MOV IFILLD0NE.PL00P+2 
JHP PARTEST 


;PUT ADDR OF WRITE MESSAGE IN PAR ER TYPOUT 1 
; I F NO LOOP GO TO NEXT SECTOR 
; IF LOOP RETURN THROUGH PLOOP TO REWRITE 
;G0 INC LOG AND TEST FOR RETRY 


007532 012737 007172 007632 WRTSEK; 


.-SEEK ERROR DURING A WRITE FUNCTION 


007540 

007546 

007552 

007554 

007556 

007564 

007566 

007572 

007576 

007600 

007604 

007606 

007610 

007614 

007616 

007624 

007626 

007630 

007634 

007640 

007644 

007650 

007652 

007653 

007654 

007660 


012737 

004737 

000741 

104406 

032777 

001004 

104401 

004737 

104406 

005777 

100001 

000000 

004737 

104406 

032777 

001001 

000207 

000137 

104401 

104401 

013746 

104403 

003 

000 

104401 

000207 


016632 

007554 


007172 

016617 

016074 

013156 


016162 


007570 


020000 171432 

016632 

007634 

171412 


007734 

004000 171372 


SEEKER: 


STYP1 : 
SWHLT1 


HLT 7 : 
C0NT14: 


SEKR1Y: 

SEKTYP: 


MOV 
TYPOS 
• BYTE 
.BYTE 


MOV IF 1 LLBUF .SEKRT Y+2 


MOV IHWRITE.STYP1+2 
JSR PC. SEEKER 
BR WRTDONE 

CKSWR 

BIT 0SW1 3.9SWR 
BNE SWHLT1 
TYPE .MWRITE 
JSR PC. SEKTYP 
CKSWR 
TST 3SWR 
BPL C0NT14 
HALT 

JSR PC. HOME 
CKSWR 

BIT ISW11.9SWR 
BNE SEKRTY 
RTS PC 
JMP F 1LLBUF 


SETUP FOR WRT RETRY ON SEEK ERROR 
(AFTER A RECAL. THE CONTENTS OF SECTOR 1. 

TRACK 1 ARE LOADED INTO THE SECTOR BUFFER. 

TO REWRITE THE CORRECT DATA THE PROGRAM 
MUST REFILL THE SECTOR BUFFER. 

PUT ADDR OF WRITE MESSAGE IN SEEK ER TYPEOUT 1 
RECORD SEEK ERROR 

GO TO NEXT SECTOR CAN’T FIND THIS ONE 


.•CHECK DON'T PRINT ERROR SWITCH 
; PRINT WRITE (READ) SEEK ERROR 


TEST THE HALT ON ERROR SWITCH 

HALT ON THE ERROR 
RECALIBRATE ON SEEK ERRORS 

CHECK THE LOOP ON ERROR SWITCH 

IF SET LOOP ON THE ERROR THROUGH SEEK RETRY, 

RETRY WRITE COMMAND (READ COMAND) 


TYPE .MSEEK 
TYPE .HPRES 
PRESTRK.-(SP) 


TYPE .MCRLF 
RTS PC 


•type error 

•TYPE ADDRESS OF TRACK MOVED FROM 
SAVE PRESTRK FOR TYPEOUT 
GO TYPE-OCTAL ASCII 
TYPE 3 DIGIT (S) 

SUPPRESS LEADING ZEROS 
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2851 

007662 

153737 

012752 

007730 

2852 

007670 

013777 

007730 

171310 

2853 

007676 

004737 

006606 


2 85 A 

007702 

000775 



2855 

007704 

113777 

013444 

171276 

2856 

007712 

004737 

006606 


2857 

007716 

000775 



2858 

007720 

113777 

013154 

171262 

2859 

007726 

000207 



2860 





2861 

007730 

000000 



2862 

007732 

000000 



2863 





2 86 A 

007734 

104406 



2865 

007736 

032777 

000400 

171252 

2866 

007744 

001035 



2867 

007746 

012777 

040001 

171232 

2868 

007754 

004737 

006622 


2869 

007760 

000775 



2870 

007762 

005777 

171220 


2871 

007766 

100021 



2872 

007770 

104406 



2873 

007772 

032777 

020000 

171216 

2874 

010000 

001002 



2875 

010002 

004737 

012200 


2876 

010006 

104406 



2877 

010010 

005777 

171202 


2878 

010014 

100001 



2879 

010016 

000000 



2880 

010020 

032777 

004000 

171170 

2881 

010026 

001342 



2882 

010030 

000207 



2883 

010032 

012737 

000001 

013156 

2884 

010040 

000207 




2885 
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WRITE FUNCTION 

CONNWORD: 

6 1 SB UNITSEL. FUNCTION 

1$: 

NOV FUNCTION, iRXCS 

JSR pc.str 

21 : 

BR IS 

NOVB T SECTOR .8RXDB 

JSR PC.STR 

FUNCTION: 

BR 2S 

NOVB TARGET. 3RXDB 

RTS PC 

0 

DATACK: 

0 

HONE : 

CKSWR 

2S : 

BIT isws.aswR 

BNE RTN 

NOV f RECAL .3RXCS 

JSR PC, SDN 

IS: 

BR 2S 

TST 3RXCS 

BPL XHONE 

CKSWR 

BIT IB1T1 S.aSWR 

BNE IS 

JSR PC.RDCODE 

CKSWR 

3S : 

TST aswR 

BPL 3S 

HALT 

BIT JSWll.aSWR 

XHONE : 

BNE HONE 

RTS PC 

NOV #1 .PRESTRK 

RTN: 

RTS PC 


; SET UNIT SELECTION 81 T IN CONNAND WORD 
;SEND OUT CONNAND TO DRIVE 
.-WAIT FOR TR FLAG 

; SEND OUT TARGET SECTOR 
.-WAIT FOR TR FLAG 

; SEND OUT TARGET TRACK 


.-DATA CHECK ON CRC ERROR FLAG 

; TE ST NO RECAl SWITCH 
; ISSUE RECAL FUNCTION 

.WAS THERE AN ERROR 
;NO 

; YES, SHOULD IT BE PRINTED 
;NO 


; TE ST HALT ON ERROR SWITCH 


.-TEST LOOP ON ERROR SWITCH 


.-SET THE PRESENT TRACK TO TRACK 1 


SEQ 009A 


I 


CZRXBFO RX11 
CZRXBf .P1 1 


INTERFACE TEST 
08-HAY-79 14:22 
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READ DATA FROM THE DISKETTE 


SEQ 0095 


2886 

2887 

2888 






.SBTTL 

READ DATA FRON THE DISKETTE 










2889 

010042 

004737 

013352 


READ: 


JSR 

PC , INITSECTOR 


2890 

010046 

004737 

013450 


XREAD : 


JSR 

PC ,GET SEC TOR 


289 T 

010052 

005037 

007732 


REREAD: 


CLR 

DATACK 

.CLEAR CRC DATA CHECK FLAG 

2892 

010056 

005037 

007004 




CLR 

HANGER 

2893 

010062 

012746 

010136 




NOV 

IRDDONE ,-(SP) 

;SET GOOD RETURN ON STACK 

2894 

010066 

012746 

010170 




NOV 

IRDERR.-'SP) 

.SET READ ERROR RETURN ON STACK 

2895 

010072 

112737 

000107 

007730 



NOVB IRD1E. FUNCTION 


2896 

010100 

004737 

007662 




JSR 

PC , CONNWORD 


2897 

010104 

005046 




CLR 

-(SP> 

.-LONER ’CPU* LEVEL 

2898 

010106 

012746 

010114 



NOV 

ms 

- CSP) 

; SE T RETURN 'PC’ 

2899 

010112 

000002 




RT1 



;GET ’CPU’ LEVEL INTO ’PSU’ 

2900 

010114 

032777 

000040 

171064 

IS: 


BIT 

ID0NEB1 T .iRXCS 

;UA]T FOR DONE BIT 

2901 

010122 

001774 





BEQ 

IS 


2902 

010124 

005237 

007004 


2S: 


INC 

HANGER 

;UAIT FOR INTERRUPT 

2903 

010130 

001375 





BNE 

2S 


2904 

010132 

000137 

011510 




JNP 

NOINTER 

;N0 INTERRUPT ON DONE 

2905 










2906 

010136 

022737 

005510 

006604 

RDDONE: 


CNP 

IT20.PCSCOPE 

; IS THIS THE READ ONLY TES T (T20) 

; YES. DON'T CHECK FOR DELETED DATA 

2907 

010144 

001405 





BEQ 

NEXTRD 

2908 

010146 

004737 

010436 




JSR 

PC.DDCHK 

; CHECK FOR DELETED DATA INDICATOR 

2909 

010152 

005701 





TST 

R1 

.BIT 15 OF R1 IS READ 1 SECTOR FLAG 

2910 

010154 

100001 





BPL 

NEXTRD 


2911 

010156 

000207 





RTS 

PC 

; IF SET. GO VERIFY DATA JUST READ 

2912 

010160 

005337 

013442 


NEXTRD : 


DEC 

SECCNTR 


2913 

010164 

001330 





BNE 

XREAD 


2914 

010166 

000207 





RTS 

PC 

.-READ FUNCTION IS DONE 

2915 










2916 

010170 

005726 



RDERR: 


TST 

CSP) ♦ 

; REHOVE THE DONE RETURN FRON THE STACK 

2917 

010172 

032737 

000002 

012174 



BIT 

IBIT1.ASTAT 

; IS THIS A PARITY ERROR 

2918 

010200 

001413 





BEQ 

IS 

;N0, SEE IF ITS A CRC ERROR 

2919 






; PARITY 

ERROR DURING A READ 

FUNCTION 

2920 

010202 

012737 

016572 

007314 



NOV 

#HREAD,PTYP1*2 

.-PUT ADDR OF READ NESSAGE IN PAR ERR TYPEOUT 

2921 

010210 

012737 

010052 

007352 



NOV 

IREREAD.PLOOP+2 

; IF LOOP ON ERROR LOOP THROUGH PLOOP 

2922 

010216 

012737 

010160 

007356 



NOV 

INEXTRD.PCONW 

; IF NO LOOP GO TO NEXT READ 

2923 

010224 

000137 

007300 




JNP 

PARTEST 

.-RECORD PARITY ERROR AND RETRY FUNCTION 

2924 

010230 

032737 

000001 

012174 

IS: 


BIT 

#B 1 TO , AS TAT 

.IS THIS A CRC ERROR 

2925 

010236 

001011 





BNE 

CRCER 

;YES GO TEST AND LOG IT 

2926 






; SEEK ERROR 

DURING A READ FUNCTION 

2927 

010240 

012737 

010052 

007632 



NOV 

IREREAD,SEKRTy*2 

; SET SEEK CONTINUE FOR READ RETRY 

2928 

010246 

012737 

016572 

007570 



NOV 

INREAD. STYPW 

; SET ADDR OF READ NESSAGE IN SEEK ER TYPEOUT 

2929 

010254 

004737 

007554 




JSR 

PC. SEEKER 

;RECORD SEEK ERROR 

2930 

010260 

000737 





BR NEXTRD 

; GO TO NEXT SECTOR. CAN’T READ THIS ONE 
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READ DATA FROM THE DISKETTE 


2931 

2932 

2933 

2934 

2935 

2936 

2937 

2938 

2939 

2940 

2941 

2942 

2943 

2944 

2945 

2946 

2947 

2948 

2949 

2950 

2951 

2952 

2953 

2954 

2955 

2956 

2957 

2958 

2959 

2960 

2961 

2962 

2963 

2964 

2965 

2966 

2967 

2968 

2969 

2970 


010262 

010264 

010266 

010272 

010276 

010302 

010304 

010306 

010314 

010316 

010322 

010326 

010330 

010334 

010336 

010340 

010346 

010350 

010352 


010356 

010360 

010366 

010370 

010374 

010400 

010402 

010406 

010410 

010412 

010420 

010422 

010426 

010432 


005701 

100034 

005237 

004737 

005737 

001025 

104406 

032777 

001004 

104401 

104401 

104406 

005777 

100001 

000000 

032777 

001001 

000703 

000137 


104406 

032777 

001004 

104401 

104401 

104406 

005777 

100001 

000000 

032777 

001004 

062706 

000137 

000137 


CRCER : 


00^732 

010672 

011506 


020000 170702 

016542 

016162 

170662 


004000 170650 


010052 


020000 170630 

016600 

016162 


HLT10: 
CONTI 5: 


DATACRC : 


170610 


004000 

000002 

010160 

010052 


HI T 1 2 : 
170576 C0NT16: 


; CRC ERROR DETECTED WHILE RE 

TST R1 
BPL DATACRC 
INC DATACK 
JSR Pt.EHPBUFF 
TST ERCNTR 
BNE DATACRC 
CKSUR 

BIT ISWl3,aSUR 
BNE 2 % 

TYPE .HBADCRC 
TYPE .MCRLF 
CKSUR 
TST aswR 
BPL CONTIS 
HALT 

BIT #suii.asuR 
BNE 3t 
BR NEXTRD 
JMP REREAD 

.-DATA CRC ERROR 

CKSWR 

BIT ffSUl3,aSWR 
BNE 4$ 

TYPE .HCRC 
TYPE .MCRLF 
CKSWR 
TST aswR 
BPL C0NT16 
HALT 

BIT fSUll.aSUR 
BNE 51 
ADD #2.SP 
JMP NEXTRD 
JMP REREAD 


SEQ 0096 


; I F READ ONLY. REPORT DATA CRC ERROR 

; SET DATA CHECK FLAG 
; CHECK FOR A DAI A ERROR 
; WAS THERE A DATA ERROR 
; YES, REPORT IT 

; TEST DON'T PRINT SWITCH 

;TYPE CRC GENERATOR ERROR 


; TE ST HALT ON ERROR SWITCH 

.-HALT ON ERROR 
; CHECK LOOP ON ERROR SWITCH 

; DON'T LOOP 60 TO NEXT SE^OR 
.LOOP ON TEST. 


.-TEST DON’T PRINT ERROR SWITCH 
.-TYPE DATA CRC ERROR 


; TEST HALT ON ERROR SWl >CH 

;HA! T ON ERROR 

.-TEST LOOP ON ERROR 

; I F SET LOOP ON THE TEST 

.REMOVE READ DONE ADDRESS FROM STACK 

; READ NEXT SECTOR CAN'T READ THIS ONE 

;NO,GO REREAD THIS SECTOR 


1 
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?971 

010436 

022737 

006076 

006604 

DDCHK : 


CUP IT25. PCSCOPE 


; 1 S THIS TEST 25 

2972 

010444 

001041 





BNE CONTIO 



2973 

010446 

132737 

000100 

012174 



B1TB KB1T6.AS1AT 


; THI S IS TEST 25 

2974 

010454 

001056 





BNE RETURN 


;DD BIT SHOULD BE SET 

2975 

010456 

104406 





CKSWR 



2976 

010460 

032777 

020000 

170550 



BIT ISWl3.aSWR 


; TEST DON'T PRINT ERROR SWITCH 

2977 

010466 

001013 





BNE CONT1 1 



2978 

010470 

004737 

010614 




JSR PC. ERMSG 



2979 

010474 

104401 

016011 




TYPE .HDDN1S 


; TYPE MISSING DELETED DATA BIT 

2980 

010500 

052737 

000400 

012752 

DDERR: 


BIS IB1T8.UN1T SEL 


;SET HARD ERROR FLAG 

2981 

010506 

004737 

012076 




JSR PC.TYPADR 


.TYPE ADDRESS OF ERROR 

2982 

010512 

104401 

016162 




TYPE .HCRLF 



2983 

010516 

104406 



CONT1 1 : 


CKSWR 



2984 

010520 

005777 

170472 




TST iSUR 


.-TEST HALT ON ERROR SWITCH 

2985 

010524 

100001 





BPL CONTI 7 



2986 

010526 

000000 



HLT13: 


HALT 


.-HALT ON DELETED DATA ERROR 

2987 

010530 

032777 

004000 

1 70460 

CONTI 7: 


BIT ISUII.aSUR 


; TEST LOOP ON ERROR 

2988 

010536 

001402 





BEQ 41 



2989 

010540 

000137 

010052 




JHP REREAD 


.LOOP ON TEST 

2990 

010544 

000137 

010160 


41: 


JMP NEXTRD 


.READ NEXT SECTOR 

2991 

010550 

032737 

000100 

012174 

CONTIO: 


BIT IB1T6.ASTAT 


;TH1S IS NOT A DELETED DATA TRANSFER 

2992 

010556 

001415 





BEQ RETURN 



2993 

010560 

052737 

000400 

012752 



BIS KBITS, UN1TSEL 


; SE T HARD ERROR FLAG 

2994 

010566 

104406 





CKSWR 



2995 

010570 

032777 

020000 

170420 



BIT *sui3,asuR 


.-TEST DON'T PRINT ERROR SWITCH 

2996 

010576 

001347 





BNE CONT1 1 



2997 

010600 

004737 

010614 




JSR PC. ERMSG 



2998 

010604 

104401 

015765 




T YPE .HUNXDD 


.-TYPE UNEXPECTED DELETED DATA BIT 

2999 

010610 

000733 





BR DDERR 



3000 

010612 

00C207 



RETURN: 


RTS PC 



3001 










3002 










3003 

010614 

104401 

016165 


ERMSG: 


TYPE .NERHEADER 



3004 

010620 

013746 

006604 



MOV 

PCSCOPE ,-(SP) 

SAVE 

PCSCOPE FOR TYPEOUT 

3005 

010624 

104403 




TYPOS 


GO TYPE— OCTAL ASCII 

3006 

010626 

006 




.BYTE 

6 ; 

TYPE 

6 DIGITS 

3007 

010627 

000 




.BYTE 

0 : 

SUPPRESS LEADING ZEROS 

3008 

010630 

104401 

006753 




TYPE .NPASS 



3009 

010634 

013737 

002556 

010646 



NOV PASS, 11 



3010 

010642 

004537 

015642 




JSR R5,SGLDEC 



3011 

010646 

000000 



11: 


OPEN 



3012 

010650 

104401 

016162 




TYPE .HCRLF 



3013 

010654 

004737 

006476 




JSR PC. DING 



3014 

010660 

000207 





RTS PC 



3015 










3016 
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CZRXBF . 

P11 08-MAY-79 

14:22 


READ AND 

VERIFY 

DATA 

SEO 0098 

3017 






.SBTTl 

READ AND VERIFY DATA 


3018 









3019 






; READ A 

SECTOR .EMPTY THE SECTOR t 

IUFFER AND VERIFY 

3020 






; THE DATA READ AGAINST CORE DATA 

BUFFER 

3021 









3022 

01C662 

052701 

1 00000 


READCHK: 


BIS IB1T15.R1 

SET READ ONE SECTOR FLAG 

3023 

010666 

004737 

010042 




J SR PC. READ 

GO READ ONE SECTOR 

3024 

010672 

005737 

013442 


EMPBUFF : 


T ST SECCNTR 

if cleared no sectors were found 

3025 

010676 

001002 





BNE IS 


3026 

010700 

000137 

011474 




JMP EXIT 

GO TO next track 

3027 

010704 

005037 

011500 


IS: 


CLR BYTECNTR 

CLEAR THE BYTE AND ERROR COUNTERS 

3028 

010710 

005037 

011506 




CLR ercntr 


3029 

010714 

052701 

000200 




BIS AB1T7.R1 

R1 BIT 7 IS USED AS FIRST ERROR FiAG 

3030 

010720 

004737 

011014 




J SR PC. ADJSUM 

ADJUST DATA AND CK SUM FOR ADDRESSES 

3031 

010724 

005037 

011104 




CLR CKSUM 

SET UP FOR CHECK SUM ACCUMULATION 

3032 

010730 

012746 

011334 




MOV AEMPDONE.-(SP) 

SE1 UP RETURN ADDRESSES 

3033 

010734 

012746 

011106 




MOV /TEMPER . - 1 SP ) 


3034 

010740 

005046 




CLR 

- ( SP) 

LOWER ’CPU* LEVEL 

3035 

010742 

012746 

010750 



NOV 

#2S.-CSP> 

SET RETURN ’PC' 

3036 

010746 

000002 




RT1 


GET ’CPU’ LEVEL INTO ’PSW* 

3037 

010750 

012777 

000103 

170230 

2S : 


MOV TEBlE.iRXCS 

load EMPTY buffer function 

3038 

010756 

105777 

170224 


EMPFLAG: 


T STB 3RXCS 

TEST FOR TR FLAG 

3039 

010762 

100375 





8PL EMPFLAG 


3040 









3041 

010764 

117737 

1 70220 

011502 

CKBYTE: 


MOVB BRXDB.BADBYTE 

SAVE BYTE fROM DISKETTE 

3042 

010772 

063737 

011502 

011104 



ADD BADBYTE.CKSUM 

ACCUMULATE CHECK SUM 

304 3 

011000 

123720 

011502 




CMPB BAD8YTE , < RO > ♦ 

COMPARE AGAINST GOOD BYTE 

3044 

011004 

001054 





BNE DATAER 

IF NOT EQUAL GO TO DATAER 

3045 

011006 

005237 

011500 




INC BYTECNTR 

j 

3046 

011012 

000761 





BR EMPFLAG 

GET NEXT BYTE > 

304 7 








j 

3048 

011014 

113737 

013154 

017456 

ADJSUM: 


MOVB TARGET, BUF ADR 

SET FIRST AND SECOND SUES WITH ADDRESSES j 

3049 

011022 

113737 

013444 

017457 



MOVB T SECTOR , BUF ADR* 1 


3050 

011030 

013737 

012564 

011104 



MOV SUM. CK SUM 

GET THE PATTERN SUM | 

3051 

011036 

063737 

013154 

011104 



ADD TARGET. CKSUM 

ADD TRACK ADDRESS TO CHECK SUM 

3052 

011044 

063737 

013444 

011104 



ADD TSECTOR, CKSUM 

ADD SECTOR ADDRESS TO CHECK SUM , 

5053 

011052 

113737 

011104 

017654 



MOVB CKSUM. BUF ADR* 1 76 

INSERT CHECK SUM TO DATA BUFFER 

3054 

011060 

106337 

011104 




ASLB CKSUM 

GENERATE NEGIT1VE CHECK SUM 

3055 

011064 

105437 

011104 




NEGB CKSUM 


3056 

011070 

113737 

011104 

017655 



MOVB CKSUM, BUF ADR* 1 77 

INSERT NEG.SUM INTO DATA BUF F E R 

3057 

011076 

012700 

017456 




MOV ibufadr.ro 

SET ADDRESS OF BYTE IN RO 

3058 

011102 

000207 





RTS PC 

RETURN 

3059 









3060 

011104 

000000 



CKSUM: 


0 

i 

3061 

3062 

011106 

005726 



EMPER: 


T ST (SP)* 

REMOVE THE DONE RETURN FROM ThE STACK i 

3063 

011110 

012737 

016444 

007314 



MOV ahempty.piypw 

PUT ADDR OF EMPTYBUF MESSAGE IN PAR ER TvPOu! 1 

3064 

011116 

012737 

010672 

007352 



MOV TEMPBUFF .PLOOP‘2 

RETURN THROUGH HERE TO LOOP ON ERROR 

3065 

011124 

012737 

011456 

007356 



MOV tnxread.pconw 

IF NO LOOP ON ERROR GO TO NFXT SECTOR 1 

3066 

011132 

000137 

007300 




JMP PARTEST 

REPORT PARITY ERROR i 

3067 








1 

1 

i 

1 

i 
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READ AND 

verify data 


SEO 0099 

3068 

011136 

052737 

000400 

012752 

DATAER: 

BIS »B1T8.UN1TSEL 

.SET THE HAD ERROR FLAG 


3069 

011144 

005237 

011506 



INC ERCNTR 

; INC THE BYTE ERROR COUN’ER 


3070 

011150 

104406 




CKSWR 



3071 

011152 

032777 

020000 

170036 


BIT ISUl3,aSUR 

.TEST PRINT ERROR SW IN SWR 
.DON'T PRINT THE ERROR 


3072 

011160 

001054 




BNE N0ER1YP 


3073 

011162 

032777 

001000 

170026 


BIT »SW9.aSWR 

; TEST PRINT 10 ERRORS SWITCH 


3074 

011170 

001004 




BNE It 

; IF SET PRINT ALL ERRORS 


3075 

011172 

023727 

011506 

000012 


CUP ERCNTR.I10. 

.HAVE 10 ERRORS BEEN TYPED 


3076 

011200 

003044 




B6T NOERTYP 

; YES. DON'T PRINT ANY NORE 


3077 

011202 

105701 



It • 

TSTB R1 

; TEST FIRST ERROR FLAG 


3078 

011204 

100014 




BPL TYPERR 



3079 

011206 

004737 

010614 



JSR PC.ERNSG 

.PRINT ADDRESS OF TEST 


3060 

011212 

104401 

Cl 6034 



TYPE .NDERHDR 

.-FIRST ERROR. PRINT ERROR HEADER 


3061 

011216 

104401 

316162 



TYPE .NCRlF 



3062 

011222 

004737 

312076 



JSR PC.TYPADR 

; PR 1 NT TRACK AND SECTOR LOCATIONS 


3063 

011226 

104401 

016123 



TYPE , NCOLNUN 

; SET UP COLNUN HEADINGS 


3064 

011232 

042701 

000200 



BIC I01T7.R1 

; clear first error flag 


3065 

011236 

013737 

011500 

011250 

TYPERR: 

NOV BYTECNTR.1l 

.-PRINT BYTE NUNBER 


3066 

011244 

004537 

015642 



JSR R5.SGLDEC 



3067 

011250 

000000 



It: 

OPEN 



3066 

011252 

104401 

016157 



TYPE , DBlSP 



3089 

011256 

013746 

011502 



NOV BADBYTE.-(SP) 

; PR 1 NT BYTE READ FRON DISKETTE 


3090 

011262 

104403 




TYPOS 



3091 

011264 

000003 




.WORD 3 



3092 

011266 

104401 

016157 



TYPE .DBlSP 

; GE T GOOD BYTE 


3093 

011272 

114037 

011504 



NOVB -(RO).GOODBYTE 


3094 

011276 

005200 




INC RO 

.-RETURN RO TO NEXT BY 1 E IN BUFFER 


3095 

011300 

013746 

011504 



NOV GOODBYTE .-CSP) 

; PRINT GOOD DATA 


3096 

011304 

104404 




TYPON 


3097 

011306 

104401 

016162 



TYPE .NCRIF 



3098 

011312 

104406 



NOERTyP: 

CKSWR 

.-TEST HALT ON ERROR SWITCH 


3099 

011314 

005777 

167676 



TST aSWR 


3100 

011320 

100001 




BPL C0NT20 



3101 

011322 

000000 



HIT 14 : 

HALT 



3102 

011324 

005237 

011500 


C0NT20: 

INC BYTECNTR 



3103 

011330 

000137 

010756 



JNP ENPFLAG 



3104 








1 
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3105 

011334 

005737 

007732 


3106 

011340 

001401 



3107 

011342 

000207 



3108 

011344 

005737 

011506 


3109 

011350 

001442 



5110 

011352 

104406 



3111 

01 1 354 

032777 

020000 

167634 

3112 

011362 

001024 



3113 

011364 

104401 

016375 


3114 

0U370 

013737 

011506 

011402 

3115 

011376 

004537 

015642 


3116 

011402 

000000 



3117 

011404 

104401 

016712 


3118 

011410 

105737 

011104 


3119 

011414 

001403 



3120 

011416 

104401 

016677 


3121 

011422 

000402 



3122 

011424 

104401 

016705 


3123 

011430 

104401 

016162 


3124 

011434 

104406 



3125 

011436 

032777 

004000 

167552 

3126 

011444 

001404 



3127 

011446 

004737 

010052 


3128 

011452 

000137 

010672 


3129 

011456 

005337 

013442 


3130 

011462 

001404 



3131 

011464 

004737 

010046 


3132 

011470 

000137 

010672 


3133 

011474 

005001 



3134 

011476 

000207 



3135 





3136 

011500 

000000 



3137 

011502 

000000 



3138 

011504 

000000 



3139 

011506 

000000 



3140 





3141 





3142 





3143 





3144 





3145 

011510 

104406 



3146 

011512 

032777 

020000 

167476 

3147 

011520 

001006 



3148 

011522 

004737 

010614 


3149 

011526 

104401 

016320 


3150 

011532 

104401 

016162 


3151 

011536 

104406 



3152 

011540 

005777 

167452 


3153 

011544 

100001 



3154 

011546 

000000 



3155 

011550 

004737 

011554 



J 8 
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READ AND VERIFY DATA 

ENPDONE : 

TST DATACK 

BEQ It 

RTS PC 

It: 

TST ERCNTR 

BEQ NXREAD 

CKSWR 

BIT «swi3,aswR 

BNE 21 

TYPE .NERCT 

NOV ERCNTR, 3t 

JSR R5.SGLDEC 

3$: 

OPEN 

TYPE .HSUN 

TSTB CKSUN 

BEQ 4t 

TYPE ,NBAD 

BR 51 

4S: 

TYPE .NGOOD 

St: 

TYPE .HCRIF 

2t : 

CKSWR 

BIT iswii.aswR 

BEQ NXREAD 

JSR PC. REREAD 

JNP ENPBUFF 

NXREAD : 

DEC SECCNTR 

BEQ EXIT 

JSR PC.XREAD 

JNP ENPBUFF 

EXIT: 

CLR R1 

RTS PC 

BYTECNTR: 

0 

BADBYTE: 

0 

GOODBYTE: 

0 

ERCNTR: 

0 

• 4 

;AN 

INTERRUPT DID NOT OCCURE 

NOINTER: 

CKSWR 

BIT «swi3,aswR 

BNE It 

JSR PC.ERNSG 

TYPE .WINTER 

TYPE ,NCRLF 

It: 

CKSWR 

TST aswR 

BPL C0NT2T 

HL T 1 5 : 

halt 

C0NT21 : 

JSR PC , INTSERV 


3156 


SEQ 0100 


WAS THIS READ CHECK CAUSED BY A CRC ERROR 
NO 

YES, RETURN TO CRC HANDLER 
WAS THERE ERRORS 
NO ERRORS 

YES, TEST DON’T PRINT SWITCH 

DON’T PRINT THE ERROR 

PRINT THE TOTAL DATA ERROR COUNT 


; INDICATE IF CHECK SUN WAS GOOD OR HAD ERRORS 


TEST LOOP ON ERROR SWITCH 
IF NOT SET GO TO NEXT SECTOR 
YES. GO REREAD THE DATA 
GO RECHECK THE DATA 


; READ THE NEXT SECTOR 
.-CLEAR THE ONE READ FLAG 


T A FUNCTION DONE FLAG. 


; TEST DON’T PRINT ERROR SWITCH 

;TYPE NO INTERRUPT ON DONE ERROR 

.-TEST HAlT ON ERROR SWITCH 
; HALT ON ERRUR 

• JSR TO 1NTSERV AS IF IT WAS AN INTERRUPT 









X 8 




CZRXBfO 

R X 1 1 INTERFACE 

TEST 

MACY11 

30A 1 1 052 > 

29-MAY-79 08:23 PAGE 

73 



CZRXBF . 

P11 08-HAY-79 

14:22 


INTERRUPT SERVICE 



SEQ 0101 

3157 






.SBTTL 

INTERRUPT SERVICE 




3158 











3159 

011554 

117737 

167430 

012174 

INTSERV: 


NOVB 9RXDB.ASTAT 


.SAVE THE ERROR AND STATUS UORD 


316C 

011562 

005777 

167420 




TST 8RXCS 


.-TEST THE ERROR FLAG 


3161 

011566 

100444 





BN1 RXERROR 


; THERE UAS AN ERROR GO REPORT IT 


3162 

011570 

032737 

000004 

012174 



BIT IB1T2.ASTAT 


;IS INI T DONE SET 


3163 

011576 

001402 





BEQ 2S 


; NO. CONTINUE 


3164 

011600 

000137 

012034 




JNP RXPUR 


; Y E S , REPORT POUER FAILED AND RESTART 


3165 

011604 

032737 

000003 

012174 

2S : 


BIT I 3.ASTAT 


;ARE PAR OR CRC BITS SET 


3166 

011612 

001021 





BNE IS 


; YES GO REPORT ERROR 


3167 

011614 

132777 

000040 

167364 



B1TB IDONEBIT .3RXCS 

;JS DONE SET 


3168 

011622 

001012 





BNE 3S 


;JF SET RETURN TO TEST 


3169 

011624 

104406 





CKSUR 




3170 

011626 

032777 

020000 

167362 



BIT #SWl3,aSUR 


.•TEST DON’T PRINT ERROR SUITCH 


31 71 

011634 

001004 





BNE 4S 


;DON*T PRINT 


3172 

011636 

104401 

016353 




TYPE .NUKN1NT 


; T YPE UNKNOUN INTERRUPT 


3173 

011642 

104401 

016162 




TYPE ,NCRLF 




3174 

011646 

000002 



4$: 


RTI 


.•RETURN FRON THE INTERRUPT 


3175 

011650 

062706 

000006 


3$: 


ADD 16, SP 


.•BYPASS INTERRUPT POINTERS ON STACK 


3176 

011654 

000207 





RTS PC 


.RETURN TO PROGRAN 


3177 

011656 

104406 



IS: 


CKSUR 




3178 

011660 

032777 

020000 

167330 



BIT #SU13,8SUR 


.-TEST DON’T PRINT ERROR SUITCH 


3179 

011666 

001004 





BNE RXERROR 




3180 

011670 

104401 

016656 




TYPE .HNOFLAG 


; TYPE NO STATUS ERROR ERROR 


3181 

011674 

104401 

016162 




TYPE .NCRLF 




3182 

011700 

005237 

006520 


RXERROR : 


INC ERRORS 


; AN ERROR INDICATOR 


3183 

011704 

001775 





BEQ RXERROR 




3184 

011706 

052737 

000400 

012752 



BIS IB1T8.UNITSEL 


.SET HARD ERROR FLAG 


3185 

011714 

012777 

000017 

167264 

2S: 


NOV IRDER .3RXCS 


;GET THE ERROR CODE 


3186 

011722 

004737 

006622 


3S: 


JSR PC, SON 


.-TEST fOR DONE FLAG 


3187 

011726 

000775 





BR 3S 




3188 

011730 

03277? 

000002 

167252 



BIT «2.aRXDB 


;UAS THERE A PARITY ERROR 


3189 

011736 

001403 





BEQ IS 


;N0. CONTINUE 


3190 

011740 

004737 

012050 




JSR PC .PART YP 


; YES. GO REPORT THE PARITY ERROR 


3191 

011744 

000763 





BR 2S 


.•REISSUE THE FUNCTION 


3192 

01 1 746 

117737 

167236 

012176 

IS: 


NOVB aRXOB.BSTAT 


; SAVE THE ERROR CODE IN B STATUS 


3193 

011754 

104406 



NOPRNT : 


CKSUR 




3194 

011756 

032777 

020000 

167232 



BIT #SUl3,aSUR 


; TEST PRINT ERROR SUITCH IN SUR 


3195 

011764 

001020 





BNE 2S 




3196 

011766 

104401 

016162 




TYPE .NCRLF 




3197 

011772 

004737 

010614 




JSR PC.ERNSG 


; T YPE ERROR AND MESSAGES 


3198 

011776 

104401 

016254 




TYPE .NRXCS 


.-TYPE COMMAND STATUS REGISTER 


3199 

012002 

013746 

007730 



NOV 

FUNCTION, -(SP) ; 

; SAVE 

FUNCTION FOR TYPEOUT 


3200 

012006 

104403 




TYPOS 

• 

;G0 TYPE— OCTAL ASCII 


3201 

012010 

006 




.BYTE 

6 

.-TYPE 

6 DIGIT (S) 


3202 

012011 

000 




.BYTE 

0 ; 

; SUPPRESS LEADING ZEROS 


3203 

012012 

004737 

012076 




JSR PC.TYPADR 


.-TYPE ADDRESSES AND RUN CONDITIONS 


3204 

012016 

104401 

016162 




TYPE .NCRLF 




3205 

012022 

004737 

012246 




JSR PC , T Y P CODE 


.•PRINT THE STATUS REGISTERS 


3206 

012026 

062706 

000004 


2S: 


ADO I4.SP 


.•MOVE ERROR RETURN TO TOP OF STACK 


3207 

012032 

000207 





RTS PC 




3208 

3209 

012034 

104401 

016727 


RXPUR: 


TYPE .NRX11 


; ONLY THE RXll POUER HAS FAKED 


3210 

012040 

104401 

015332 




TYPE .SPOUER 


.-PRINT POUER FAILED 


3211 

012044 

000137 

001350 




JNP RESTART 


; GO TO RESTART 




7*. 


SEQ 0102 


SAVE 8RXCS FOR TYPEOUT 
60 TYPE— OCTAL ASCII 
TYPE 6 DIGIT (S) 
SUPPRESS LEADING ZEROS 


.-TYPE TRACK ADDRESS 
SAVE TARGET FOR TYPEOUT 
60 TYPE— OCTAL ASCII 
TYPE 3 DIGIT (S) 

SUPPRESS LEADING ZEROS 

;T YPE SECTOR ADDRESS 

.•CLEAR ALL BUT SECTOR ADDRESS 
SAVE 2S FOR TYPEOUT 
GO TYPE— OCTAL ASCII 
TYPE 2 D161 T (S) 

SUPPRESS LEADING ZEROS 

;UHl T CH DRIVE IS BEING USED 

.-TYPE UNIT 0 

.-TYPE UNIT 1 


; SAVE THE A STATUS 

;READ THE B STATUS REGISTER 

.-WAIT FOR DONE FLAG 

;WAS THERE A PARITY ERROR 
: NO. CONTINUE 

;YES, REPORT THE PARITY ERROR 
;RETRY READING STATUS B 
.SAVE THE B STATUS CODES 

; TYPE THE CONTENTS OF THE TWO STATUS REGISTERS 
SAVE ASTAT FOR TYPEOUT 
GO TYPE— OCTAL ASCII 
TYPE 3 DIGIT (S) 

SUPPRESS LEADING ZEROS 


CZRXBFO R X 1 1 INTERFACE TEST 
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3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 

3274 

3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

3294 

3295 

3296 

3297 

3298 

3299 

3300 

3301 

3302 

3303 

3304 

3305 

3306 

3307 

3308 

3309 

3310 

3311 

3312 

3313 


H 8 
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PATTERN GENERATOR 

.SBTTL PATTERN GENERATOR 


SEQ 0105 


NOTE: ALL DATA PATTERNS WILL BE MODIFIED SO THE FIRST BYTE WILL 
CONTAIN THE TRACK ADDRESS. THE SECOND BYTE WILL CONTAIN THE UNIT 
NUMBER AND SECTOR ADDRESS IN WHICH THE DATA IS WRITTEN. THE MOST 
SIGNIFICANT BIT OF THIS SECOND BYTE INDICATES THE UNIT. UNIT 0 
IF "0" UNIT 1 IF 'T*. THE LAST TWO BYTES CONTAIN THE CHECK SUM. 


012306 

012704 017456 

• # 

GETPATTERN: 

MOV IBUFADR.R4 

SET ADDRESS OF FIRST DATA 

012312 

005037 012564 


CLR SUM 

SET UP FOR ACCUMULATION OF 

012316 

013705 012352 


MOV PAT.R5 

GET PATTERN BITS 

012322 

006305 


ASL R5 


012324 

000175 012330 


JMP iPATTERNS(R5) 


012330 

012354 

PATTERNS: 

DATAO 

000 DATA BYTE 

012332 

012366 


DATA1 

377 DATA BYTE 

012334 

012376 


FLOATO 

FLOAT A 0 THROUGH ALL 1 * S 

012336 

012440 


Float i 

FLOAT A 1 THROUGH ALL 0*S 

012340 

012446 


PAT 125 

125/052 DATA WORD 

012342 

012466 


PAT314 

314/063 DATA WORD 

012344 

012476 


COUNT 

1NCRUMENT DATA PATTERN 

012346 

012516 


RANDATA 

RANDOM DATA BYTE 

012350 

000000 

DATABYTE: 

0 


012352 

000000 

PAT: 

0 




* 9 

.LOAD 

SOFTWARE BUFFER WITH ALL ZEROS 



PAT = 0 


012354 

005037 012350 

DATAO: 

CLR DATABYTE 


012360 

004737 012536 

PATGEN: 

JSR PC. LOAD 

GO LOAD THE DATA BUfFER 

012364 

000775 


BR PATGEN 



CHECK SUM 


012366 

012374 


112737 

000771 


000377 012350 DATA1 : 


;LOAD SOFTWARE BUFFER WITH ALL ONES 
; PAT = 1 


MOVB #377. DATABYTE 
BR PATGEN 


N 8 
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CZRXBF.P11 08-NAY-79 14:22 PATTERN GENERATOR 


SEQ 0104 


3314 

3315 

3316 

3317 

3318 

3319 

3320 

3321 

3322 

3323 

3324 

3325 

3326 

3327 

3328 

3329 

3330 

3331 

3332 

3333 

3334 

3335 

3336 

3337 

3338 

3339 

3340 

3341 

3342 

3343 

3344 

3345 

3346 

3347 

3348 

3349 

3350 

3351 

3352 

3353 

3354 

3355 

3356 

3357 

3358 

3359 

3360 

3361 

3362 

3363 

3364 

3365 

3366 


: FLOAT A 0 THROUGH ONES IN SOFTUAHw BUFFER 
; PAT = 2 


012376 112737 000376 012350 

012404 000261 

012406 012702 000000 

012412 103001 

012414 005202 

012416 004737 012536 

012422 000241 

012424 005702 

012426 001401 

012430 000261 

012432 106137 012350 

012436 000763 


FlOATO: 

XPATGEN: 

It: 


NOVB #376. DATABYTE 
SEC 

NOV 10. R2 
BCC 2S 
INC R2 
JSR PC. LOAD 
CLC 

1ST R2 
BEQ 3S 
SEC 

ROLB DATABYTE 
BR It 


; SET UP A ONES FIELD 

; SET THE C BIT TO ROTATE THROUGH THE DATA 

; CLR R2 (CAN’T USE "CLR" IT CLEARS T BIT) 

;BR IF "C” BIT IS CLEARED 

;SET R2 IF "C" BIT IS SET 

;G0 LOAD THE DATA BUFFER 

.-CLEAR THE "C” BIT 

;IS R2 NONZERO 

;YES. SET THE "C" BIT 


; FLOAT A 1 THROUGH ALL ZEROS IN SOFTWARE BUFFER 
; PAT = 3 


012440 005037 012350 
012444 000757 


FLOAT 1 : 


CLR DATABYTE 
BR XPATGEN 


LOAD SOFTWARE BUFFER WITH ALTERNATING 1 AND 0 FOR 
ONE BYTE AND THE CONPLlHENT INTO THE NEXT 
PAT = 4 


012446 112737 000125 012350 

012454 004737 012536 

012460 105137 012350 
012464 000773 


PAT 125: 
XXPATGEN: 


NOVB #125. DATABYTE 
JSR PC. LOAD 
CONB DATABYTE 
BR XXPATGEN 


LOAD SOFTWARE BUFFER WITH ALTERNATING PAIRS OF 1 AND 0 AND 

cohpliment into the next 

PAT = 5 


012466 112737 000314 012350 

012474 000767 


PAT314 ; 


NOVB 1314, DATABYTE 
BR XXPATGEN 


012476 012737 000377 012350 
012504 005237 012350 
012510 004737 012536 
012514 000773 


;LOAD SOFTWARE BUFFER WITH COUNT PATTERN 
; PAT = 6 

COUNT: NOV #377, DATABYTE 

It: INC DATABYTE 

JSR PC. LOAD 
BR It 
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3367 

T IA.B 





• 9 



5X>5 

5569 






; LOAD SOFTWARE BUFFER WITH 

3370 

1171 






; PAT ~ 7 


3372 

012516 

004737 

012566 


RANDATA: 

JSR 

PC. RANGEN 

3373 

012522 

113737 

012660 

012350 


MOVE 

1 RANUM. DATABYTE 

3374 

012530 

004737 

012536 



JSR 

PC. LOAD 

3375 

012534 

U00770 




BR RANDATA 

3376 

3377 

012536 

063737 

012350 

012564 

LOAD: 

ADD 

DATABYTE. SUM 

3378 

012544 

113724 

012350 



MOVE 

1 DATABYTE, (R4)+ 

3379 

012550 

022704 

017656 



CMP 

#BUFADR«200,R4 

3380 

012554 

001401 




BEQ 

It 

3381 

■" 12556 

000207 




RTS 

PC 

3382 

012560 

005726 



It: 

T ST 

(SP) + 

3383 

012562 

000207 




RTS 

PC 

3384 








3385 

012564 

000000 



SUM: 

0 


3386 








3387 

012566 

012700 

000001 


RANGEN: 

MOV 

I1.R0 

3388 

012572 

063700 

012654 



ADD 

RAN1.R0 

3389 

012576 

063700 

012656 



ADD 

RAN2.R0 

3390 

012602 

042700 

170000 



B1C 

f 170000 .ro 

3391 

012606 

000241 




CLC 


3392 

012610 

006100 




ROL 

RO 

3393 

012612 

006100 




ROL 

RO 

3 X 94 

012614 

010037 

012654 



MOV 

R0.RAN1 

3395 

012620 

005000 




CLR 

RO 

3396 

012622 

013700 

012656 



MOV 

RAN2.R0 

3397 

012626 

006000 




ROR 

RO 

3398 

012630 

006000 




ROR 

RO 

3399 

012632 

063700 

012654 



ADD 

RAN1.R0 

3400 

012636 

042700 

1 70000 



B1C 

f 170000.R0 

3401 

012642 

010037 

012656 



MOV 

R0.RAN2 

3402 

012646 

010037 

012660 



MOV 

RO, RANUM 

3403 

012652 

000207 




RTS 

PC 

3404 








3405 

012654 

001234 



RANI : 

001234 

3406 

012656 

000765 



RAN2: 

000765 

3407 

012660 

000000 



RANUM: 

0 


3408 









SEO OTOS 


IANDOM DATA PATTERN 


;GET RANDOM NUMBER 


ACCUMULATE THE PATTERN CHECK SUM 

LOAD THE DATA BUFFER 

HAVE 128 BYTES BEEN GENERATED 

IF YES. RETURN TO TEST 

IF NO, RETURN TO PATTERN GENERATOR 

TAKE PATTERN RETURN ADDRESS OF STACK 

RETURN TO TEST 









C 9 


] 
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Pll 
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UNIT SELECTION 


SEQ 0106 

3409 





.SBTTL 

UNIT SELECTION 



3410 









3411 





; TEST 

FOR SELECTED UNITS, DRIVE READY, AND USED CONDITIONS 


3412 





; ALSO 

CONTAINS A "HAD ERROR" f LAC 

TO BE TESTED AT EOP. 


3413 





; the bits in unitsel are used as 

FOLLOWS 


3414 









5415 





; B I T 1 5 

r UNl T 1 SELECTED VIA SWR 



3416 





;B1T14 

=UN1T 1 USED BIT 



3417 





;B1T8 

= T H I S PASS HAD AN ERROR 



3418 





; B I T 7 

=UNIT 0 SELECTED VIA SWR 



3419 





; B I T 6 

=UN1T 0 USED BIT 



5420 





; B 1 T 4 

=UNIT SELECTION FOR FUNCTION WORD 


3421 









3422 









3423 









3424 

012662 

032737 

000100 

012752 

GETUN1T: 

BIT #B1T6, UNITSEL 

WAS UNIT 0 JUST USED 


3425 

012670 

001012 




BNE IS 

UNIT 0 USED CHECK UNIT 1 


3426 

012672 

105737 

012752 



T STB UNITSEL 

WAS UNIT 0 SELECTED 


3427 

012676 

100007 




BPL IS 

NO GO TO UNIT 1 


3428 

012700 

042737 

040020 

012752 


BIC #40020, UNITSEL 

CLEAR UNIT 1 USED BIT AND 

FUNCTION UNIT BIT 

3429 

012706 

052737 

000100 

012752 


BIS #B1T6, UNITSEL 

SET UNIT 0 USED BIT 


3430 

012714 

000207 




RTS PC 



3431 

012716 

005737 

012752 


IS: 

TST UNITSEL 

WAS UNIT 1 SELECTED 


3432 

012722 

100012 




BPL 2 S 

NO RETURN 


3433 

012724 

032737 

040000 

012752 


BIT IBIT14, UNITSEL 

HAS UNIT 1 BEEN USED 


3434 

012732 

001006 




BNE 2S 

YES RETURN 


3435 

012734 

042737 

000100 

012752 


BIC IB1T6, UNITSEL 

CLEAR UNIT 0 USED BIT 


3436 

012742 

052737 

040020 

012752 


BIS #40020, UNITSEL 

•SET UNIT 1 USED BIT AND FUNCTION UNIT BIT 1 j 

3437 

012750 

000207 



2S: 

RTS PC 



3438 









3439 









3440 









3441 

012752 

000000 



UNITSEL: 

0 



3442 









3443 





; TEST 

THAT ALL UNITS HAVE BEEN ACCESSED 


3444 









3445 

012754 

005737 

012752 


DONE: 

TST UNITSEL 

IS UNIT 1 SELECTED 


3446 

012760 

100006 




BPL IS 

NO RETURN 


3447 

012762 

032737 

040000 

012752 


BIT #B1T14, UNITSEL 

YES HAS IT BEEN USED 


3448 

012770 

001002 




BNE IS 

YES RETURN 


3449 

012772 

062716 

000002 



ADD #2,asp 

BYPASS NOT DONE RETURE ON 

STACK 

34 50 

012776 

000207 



IS: 

RTS PC 



3451 












• 



- 

• 
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22 TRACK SEQUENCE SELECTION SEQ 0107 

.SBTTL TRACK SEQUENCE SELECTION 
; INITIALIZE TRACK SEQUENCE 

.NOTE: IF WORD SEQUEN IS CLEARED THEN TRACK SEQUENCE IS FROM 0-52-53-1 14 ONLY 
; IF BIT 15 OF SEQUEN IS T THEN TRACK SELECTION IS INC. BETWEEN SELECTED OD/lD LIMITS. 

; IF BIT 7 IS 'T* THEN TEST 25 DECREMENT SEQUENCE IS REQUIRED. 


3A61 


3462 

013000 

105737 

013164 


INITTRACK: 

TSTB SEQUEN 

IS THIS TEST 26 SPECIAL SEQUENCE 

34,63 

013004 

100442 




BMI 2S 

YES, DEC FROM TRACK 12 TO 0 

34,64, 

013006 

042737 

100200 

001200 


BIC #100200. OD 

clear first used bits 

34.65 

015014 

005737 

001200 



TST OD 

TEST CONTENTS OF 1D.0D FOR 0 

34,66 

013020 

001440 




BEQ 3S 

SEQUENCE WILL BE FROM "HOME **-52-53- 114-0 

3467 

013022 

052737 

100000 

013164 


BIS IBIT15. SEQUEN 

LIMITS WERE SELECTED. INC FROM OD TO ID. 

34,68 

013030 

113737 

001200 

013154 


H0V8 OD. TARGET 

INI T OD AS PRESENT TRACK 

3469 

013036 

005037 

013162 



CLR XID 

INI T WORKING ID AND OD LOCATIONS 

3470 

013042 

113737 

001201 

013162 


MOVB ID. XID 


3471 

013050 

005037 

013160 



CLR XOD 


3472 

013054 

1 13737 

001200 

013160 


MOVB OD.XOD 


3473 

013062 

013737 

013162 

013152 


MOV XID, TRKCNTR 

St T UP NUMBER OF TRACK MOVEMENTS 

3474 

013070 

163737 

013160 

013152 


SUB XOD, TRKCNTR 


3475 

013076 

005237 

013152 



INC TRKCNTR 


3476 

013102 

052737 

100200 

001200 

IS: 

BIS #1 00200, OD 

SET FIRST TIME BITS IN ID.OD 

3477 

013110 

000207 




RTS PC 


3478 

013112 

012737 

000013 

013152 

2S : 

MOV #13, TRKCNTR 

SET TRACK COUNTER 

3479 

013120 

000770 




BR IS 


34.80 

013122 

012737 

000004 

013152 

3S: 

MOV #4, TRKCNTR 

SET THE TRACK COUNTER 

3481 

013130 

000764 




BR IS 


3482 








3483 








348^ 

TyiC 





• • 



jhoj 

3A86 

013132 

1 13737 

013154 

013156 

GET TRACK: 

MOVB TARGET. PRESTRK 

RESET TO PRESENT TRACK 

3487 

013140 

005737 

013164 



TST SEQUEN 

IS THIS THE LIMITED SEQUENCE 

3488 

013144 

001410 




BEQ L1MTRK 

YES. DOING ONLY 0-52-55-114 

3489 

013146 

100446 




BMI SEQ1 

NO. SEQUENCE IS BETWEEN SELECTED LIMITS 

3490 

013150 

000463 




BR SEQ2 

NO. THIS IS TEST 26 DEC SEQUENCE 

3491 








3492 

013152 

000000 



TRKCNTR: 

0 


3493 

013154 

000000 



TARGET: 

0 


3494 

013156 

000000 



PRESTRK: 

0 


3495 

013160 

000000 



XOD: 

0 


3496 

013162 

000000 



X I D : 

0 


3497 

0 1 3 1 64 

000000 



SEQUEN: 

0 



3A98 




1 
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3499 

3500 

3501 

3502 

3503 
350 ^. 

3505 

3506 

3507 

3508 

3509 

3510 

3511 

3512 

3513 
35K 

3515 

3516 

3517 

3518 

3519 

3520 

3521 

3522 

3523 
352A 

3525 

3526 

3527 

3528 

3529 

3530 

3531 

3532 

3533 
3534, 

3535 

3536 

3537 

3538 

3539 

354.0 

354.1 

354.2 

354.3 


013166 

013172 

013174, 

013202 

013210 

013212 

013216 

013220 

013226 

013234. 

013236 

01324,4. 

01324,6 

013254, 

013256 

013262 


01 3264, 
013272 
013300 
013302 
013310 
013312 
013316 


005737 

100007 

012737 

042737 

000207 

105737 

100007 

012737 

042737 

000207 

023727 

001404 

012737 

000207 

005037 

000207 


042737 100200 

123737 013162 
001004 

113737 001200 
000207 

005237 013154 
000207 


013320 

013324 

013326 

013334 

013342 

01334*. 

013350 
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TRACK SEQUENCE SELECTION 


SEQ 0108 


001200 

000052 

100000 

001200 

000053 

C00200 


013154 

001200 


013154 

001200 


013154 000114 

000114 013154 

013154 


; LIMITED SEQUENCE. ACCESS 
UNTRK: TST OD 

BPL IS 

NOV #52. TARGET 
B I C IB1T15.0D 
RTS PC 

IS: TSTB OD 

BPL 2S 

NOV #53, TARGET 
BIC #BI T7.0D 
RTS PC 

2 S: CNP TARGET. #114 

BEQ 3S 

NOV #114, TARGET 
RTS PC 

3S: CLR TARGET 

RTS PC 


TRACKS 52 TO 53 TO 114 BACK TO 0 

.TEST HIGH ORDER FIRST TINE BIT 
.NOT SET. ON TRACK 52 
;G0 TO TRACK 52 
.CLEAR FIRST TINE BIT 

; TEST LOW ORDER FIRST TINE BIT 
;NOT SET, ON TRACK 53 
;G0 TO TRACK 53 


; IS IT ON TRACK 114 
; YES, GO TO TRACK 0 
;N0, GO TO TRACK H4 

; GO TO TRACK 0 


; INCRENENT FRON 0D*1 TO ID AND RETURN TO OD 
; USED WHEN TRACK UNITS ARE SELECTED 


001200 SEQ1 
013156 

013154 


BIC #100200.00 
CNPB X ID.PRESTRK 
BNE IS 

NOVB OD. TARGET 
RTS PC 
INC TARGET 
RTS PC 


.•CLEAR FIRST TINE BUS 
.■PRESENT TRACK EQUAL TO 
;N0 GET NEW TRACK 
; YES RETURN TO OD 

; ADD 1 TO TARGET TRACK 


005737 001200 
100007 

042737 100200 

012737 000012 
000207 

005337 013154 

000207 


001200 

013154 


,-DECRENENT FRON ID = 12 TO OD 
;USED IN TEST 26 ONLY 

SEQ2: TST OD 

BPL IS 

BIC #100200,00 
NOV #12, TARGET 
RTS PC 

IS: DEC TARGET 

RTS PC 


.•FIRST TINE BIT SET 
;N0 GET NEXT TRACK 
;VES CLEAR FIRST TIME BPS 
;NOVE OUT 10 TRACKS 

; NO V E 10 NEXT TRACK 


CZRXBFO 

R X 1 1 INTERFACE 

TEST 

MAC Y 1 1 

F 9 

S0A( 1052) 29-MAY-79 08:23 PAGE 81 

CZRXBf . 

P11 

D8-MAY-79 

14:22 


SECTOR SELECTION 

3544 





.SBTTL 

SECTOR SELECTION 

3545 







3546 





SECTOR 

INITIALIZATION AND 

3547 







3548 

013352 

005737 

001202 


INI TSECTOR : 

TST FIRST 

3549 

013356 

001005 




BNE It 

3550 

013360 

005237 

001202 



INC FIRST 

3551 

013364 

112737 

000032 

001203 


MOVB #32. LAST 

3552 

013372 

113737 

001203 

013442 

It: 

MOVB LAST, SECCNTR 

3553 

013400 

163737 

001202 

013442 


SUB FIRST, SECCNTR 

3554 

013406 

005237 

013442 



INC SECCNTR 

3555 

013412 

105037 

013443 



CLR8 SECCNTRO 

3556 

013416 

113737 

0C1202 

013444 


MOV8 FIRST, TSECTOR 

3557 

013424 

162737 

000003 

013444 


SUB #3. TSECTOR 

3558 







3559 

013432 

012737 

000001 

013,46 


MOV #1. INTLEAV 

3560 

013440 

000207 




RTS PC 

3561 







3562 

013442 

000000 



SECCNTR: 

0 

3563 

013444 

000000 



TSECTOR: 

0 

3564 

013446 

000000 



INTlEAV : 

0 

3565 







3566 

013450 

042737 

000200 

013444 

GE TSECTOR: 

B1C #200. TSECTOR 

3567 

013456 

062737 

000003 

013444 


ADD #3, TSECTOR 

3568 

013464 

123737 

001203 

013444 


CMPB LAST. TSECTOR 

3569 

013472 

002010 




BGE It 

3570 

013474 

113737 

001202 

013444 


MOVB FIRST, TSECTOR 

3571 

013502 

063737 

013446 

013444 


ADD INTLEAV, TSECTOR 

3572 

013510 

005237 

013446 



INC INTLEAV 

3573 

013514 

032737 

000020 

012752 

It: 

BIT #BI14,UNITSEL 

3S74. 

013522 

001403 




BEQ 21 

3575 

013524 

052737 

000200 

01 5444 


BIS #BIT7.TSKTOR 

3576 

013552 

000207 



21 : 

RTS PC 


TEST FIRST AND LAST FOR 0 
SECTORS SPECIFIED USE THEM 
NONE SPECIFIED SET FIRST TO 
SET LAST TO MAX I HUN 
SET UP SECTOR COUNTER 


PUT FIRST SECTOR IN TARGET SECTOR 

SUB 3 FROM TSECTOR AS FIRST TIME THROUGH 

IT GETS ADDED BACK ON. 

SET INTERLEAVE OFFSET 


.•CLEAR 
; ADD 3 


THE 

FOR 


UNIT BIT BEFORE 
INTERLEAVING 


TESTING 


NEW SECTOR IS WITHIN LIMITS 
RESET TARGET SECTOR TO INTERLEAVE 
ADD ON INTERLEAVE OFFSET VALUE 
UP DATE THE OFFSET VALUE 
IS THIS UNIT 0 


; NO , SET UNIT IDENTIFIER IN TARGE 1 SEiUR 
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3577 

3578 

3579 

3580 

3581 

3582 

3583 

3584 

3585 

3586 

3587 

3588 

3589 
5590 

3591 

3592 

3593 

3594 

3595 

3596 

3597 

3598 

3599 

3600 

3601 

3602 

3603 

3604 

3605 

3606 

3607 

3608 

3609 

3610 

3611 

3612 

3613 

3614 
5615 

3616 

3617 

3618 

3619 

3620 

3621 

3622 

3623 

3624 

3625 

3626 

3627 

3628 

3629 

3630 

3631 

3632 


. SB T T L TYPE ROUTINE 


•ROUTINE TO TYPE ASC1Z MESSAGE . MESSAGE MUST TERMINATE WITH A 0 BYTE. 

•THE ROUTINE WILL INSERT A NUMBER Of NULL CHARACTERS AFTER A LINE FEED. 

•NOTE 1 : SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 

•N0TE2 : SF ILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 

•NOTE 3: SF1LLC CONTAINS THE CHARACTER TO FILL AFTER. 


•CALL: 

•1) USING A TRAP INSTRUCTION 





• • 

TYPE 

.MESADR 




••OR 






• • 

TYPE 





• * 

• « 

MESADR 


013534 

105737 

013763 

STYPE : 

TSTB 

STPFLG 

013540 

100002 



BPL 

IS 

013542 

000000 



halt 


013544 

000407 



BR 

3S 

013546 

010046 


IS: 

MOV 

RO.-(SP) 

013550 

017600 

000002 


MOV 

a2isp> .ro 

013554 

112046 


2S : 

MOvB 

(RO) ♦ (SP) 

013556 

001005 



BNE 

4S 

013560 

005726 



T ST 

(SP) ♦ 

013562 

012600 


60S: 

MOV 

(SP ) ♦ ,R0 

013564 

062716 

000002 

SS : 

ADD 

#2 . (SP) 

013570 

000002 



RT1 


013572 

122716 

000011 

4S: 

CMPB 

#ht,(sp; 

013576 

001430 



BEQ 

8S 

013600 

122716 

000200 


CMPB 

SCRLF ,(SP) 

013604 

001006 



BNE 

5S 

013606 

005726 



T ST 

(SP)* 

013610 

104401 



TYPE 


013612 

013765 



scrlf 


013614 

105037 

013750 


CLRB 

SCHARCNT 

01362C 

000755 



BR 

2S 

015622 

004737 

013704 

SS: 

JSR 

PC.STYPEC 

013626 

123726 

015762 

6S : 

CMPB 

Sf ILLC.(SP)* 

013632 

001350 



BNE 

2S 

013634 

013746 

013760 


MOV 

SNULL ,-(SP) 

013640 

105366 

000001 

7S : 

DECB 

1 (SP) 

013644 

002770 



BIT 

6S 

013646 

004737 

013704 


JSR 

PC.STYPEC 

013652 

105337 

013750 


DECB 

SCHARCNT 

013656 

000770 



BR 

7S 




horizontal tab 

PROCESSOR 

013660 

112716 

000040 

8S : 

MOVB 

r .(SP) 

013664 

004737 

013704 

9S : 

JSR 

PC.STYPEC 

013670 

132737 

0C0007 

01 3 7 SO 

BITB 

#7, SCHARCNT 

013676 

001372 



BNE 

9S 

015700 

005726 



T ST 

(SP)« 


; ; ME SADR IS FIRST ADDRESS OF AN ASC17 STRING 


; ; I S THERE A TERMINAL? 

;;BR IF YES 

;;HALT HERE IF NO TERMINAL 
; ; LEAVE 
; ; SAVE RO 

; ;GET ADDRESS OF ASCIZ STRING 

;;PUSH CHARACTER TO BE TYPED ONTO STACK 

; ; BR IF IT ISN'T THE TERMINATOR 

; ; I f TERMINATOR POP IT OFF THE STACK 

; ; RESTORE RC 

; ; ADJUST RETURN PC 

; ; RE TURN 

;;BRANCH IF <HT> 

;;BRANCH IF NOT <f RLF > 

; ; POP <CR><Lf> EQUlV 
; ; T YPE A CR AND LF 

;; CLEAR CHARACTER COUNT 
; ; GET NEXT CHARACTER 
; ;G0 TYPE THIS CHARACTER 
; ; I S IT TIME FOR FILLER CHARS.? 

; ; IF NO GO GET NEXT CHAR. 

; ;GET # OF FILLER CHARS. NEEDED 
; ; AND THE NULL CHAR. 

; ;DOES A NULL NEED TO BE TYPED? 

; ; BR IF NO-GO POP THE NULL O f F OF SUCK 
; ;G0 TYPE A NULL 
; ; DO NOT COUNT AS A COUNT 
; ; LOOP 


replace tab with space 

TYPE A SPACE 
BRANCH IF NOT A’ 

TAB STOP 

POP SPACE OFF STACK 
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3633 

013702 

000724 




BR 

2% 

563A 

013704 

105777 

000044 


STYPtC: 

T STB 

asTPs 

3635 

013710 

100375 




BPL 

STYPEt 

3636 

013712 

116677 

000002 

000036 


HOVB 

2(SP).aSTPB 

5637 

013720 

122766 

000015 

000002 


CMPB 

#CR,2(SP) 

3636 

01 3726 

OC 1 005 




BNE 

IS 

5639 

013730 

105037 

015750 



CLRB 

SCHARCNT 

3640 

013734 

000406 




BR 

STYPEX 

3641 

013736 

122766 

000012 

000002 

IS: 

CMPB 

#Lf .2 ISP) 

3642 

013744 

001402 




BEQ 

STYPEX 

5643 

013746 

105227 




1NCB 

(PC)* 

3644 

013750 

000000 



SCHARCN1 

: .WORD 

0 

3645 

015752 

000207 



STYPEX: 

RTS 

PC 

3646 








5647 

013754 

177564 



SIPS: 

.WORD 

177564 

3648 

013756 

177566 



STPB: 

.WORD 

177566 

3649 

013760 

000 



SNULL: 

.BYTE 

0 

5650 

0137M 

002 



sf ills : 

.BYTE 

2 

3651 

013762 

012 



SF1LLC: 

.BYTE 

12 

3652 

013765 

000 



STPFLG: 

.BYTE 

0 

3655 

013764 

077 



SQUES: 

.ASCII 

•■v 

3654 

013765 

015 



SCRLF : 

.ASCII 

<15> 

3655 

013766 

000012 



SlF : 

.ASC1Z 

<12> 


PS 


SEO 0111 


; GE T NEXT CHARACTER 
; W A J T UNTIL PRINTER IS READY 

; LOAD CHAR TO BE TYPED INTO DATA REG. 
; I S CHARACTER A CARRIAGE RETURN? 
.BRANCH IF NO 

; YES— CLEAR CHARACTER COUNT 
.EXIT 

;IS CHARACTER A LINE FEED? 

; BRANCH IF YES 
; COUNT THE CHARACTER 
CHARACTER COUNT STORAGE 


TTy PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUFFER REG. ADDRESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS * OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A "LINE FEED" 
"TERMINAL AVAILABLE" FLAG (81 T<07>=0- YES) 
QUESTION MARK 
CARRA1GE RETURN 
LINEFEED 


CZRXBFO RXll 
CZRXBF .P1 1 

3656 

3657 

3658 

3659 

3660 

3661 

3662 

3663 
366<. 

3665 

3666 

3667 

3668 

3669 

3670 

3671 

3672 

3673 
36 7*. 

3675 

3676 

3677 


INTERFACE TEST 
08-MAY-79 1422 
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BINARY TO OCTAL (ASCII) AND TYPE 

.SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


SEQ 0112 


•THIS ROUTINE IS USED TO CHANGE A 16*817 BINARY NUMBER 10 A 6-DIGIT 
•OCTAL (ASCII) NUMBER AND T YPE IT. 

•STYPOS— ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
•CALL: 


MOV 

TYPOS 

.BYTE 

.BYTE 


NUM.-(SP) 


NUMBER TO BE TYPED 
CALL FOR typeout 

N- 1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
M-1 OR 0 

; ; 1 = T YPE LEADING ZEROS 
; ;0-SUPPRESS LEADING ZEROS 


•STYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•STYPOS OR STYPOC 
•CALL: 

• MOV NUN.-(SP) ; .NUMBER TO BE TYPED 

• TYPON ;;CALL FOR TYPEOUT 

• 

•STYPOC— ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
•CALL: 


3676 





MOV 

NUM.-(SP) 

;; NUMBER TO BE TYPED 

3679 





typoc 


; CALL FOR TYPEOUT 

3680 








3661 

013770 

017646 

000000 


STYPOS: MOV 

9(SP) ,-(SP) 

■; PICKUP THE MODE 

3662 

013774 

116637 

000001 

014215 

MOVB 

I'SPJ.SOFlLL 

•.LOAD ZERO FILL SWITCH 

3683 

014002 

112637 

014215 


HOVB 

(SP) ♦ .SOMODE ♦ 1 

..NUMBER OF DIGITS TO TYPF 

3664 

014006 

062716 

000002 


ADD 

#2.<SP> 

; ADJUST RETURN ADDRESS 

3665 

014012 

000406 



BR 

STYPON 


3686 

014014 

112737 

000001 

014213 

STYPOC: MOVB 

#1 .S0F1LL 

; SET THE ZERO FILL SWITCH 

3687 

014022 

1 12737 

000006 

014215 

MOVB 

#6, SOMODE* 1 

; SET FOR SIX(6) DIGITS 

3686 

014030 

112737 

000005 

014212 

STYPON: MOVB 

I5.S0CNT 

; SET THE ITERATION COUN T 

3669 

014036 

010346 



MOV 

R3.-CSP) 

; SAVE R3 

3690 

014040 

010446 



MOV 

R4.-CSP) 

; SAVE R4 

3691 

0H042 

010546 



MOV 

R5.-(SP) 

.SAVE R5 

3692 

014044 

113704 

014215 


MOVB 

SOMODE* 1 .R4 

; GET THE NUMBER OF DIGITS TO TYPE 

3693 

014050 

005404 



NEG 

R4 


3694 

014052 

062704 

000006 


ADD 

#6,R4 

; SUBTRACT IT FOR MAX. ALLOWED 

3695 

014056 

110437 

014214 


MOVB 

R4. SOMODE 

; SAVE IT FOR USE 

3696 

014062 

113704 

OH213 


MOVB 

SOF 1LL.R4 

; GET THE ZERO FILL SWITCH 

3697 

014066 

016605 

000012 


MOV 

12(SP).R5 

;P1CKUP THE INPUT NUMBER 

3696 

014072 

005003 



clr 

R3 

; CLEAR THE OUTPUT WORD 

3699 

014074 

006105 



IS: ROL 

R5 

; ROTATE MSB INTO "C" 

3700 

014076 

000404 



BR 

3S 

; GO DO MSB 

3701 

014100 

006105 



2 S: ROL 

R5 

; FORM THIS DIGIT 

3702 

014102 

006105 



ROL 

R5 


3703 

014104 

006105 



ROL 

R5 


3704 

014106 

010503 



MOV 

R5.R3 


3705 

014110 

006103 



3S : ROL 

R3 

; GET LSB OF THIS DIGIT 

3706 

014112 

105337 

014214 


DECB 

SOMODE 

; T YPE THIS DIGIT? 

3707 

014116 

100016 



BPL 

7S 

: BR IF NO 

3708 

014120 

042703 

177770 


B1C 

#177770. R5 

; GE T RID OF JUNK 

3709 

014124 

001002 



BNE 

4S 

; TEST FOR 0 

3710 

0H126 

00570*. 



1ST 

R4 

^SUPPRESS THIS O 1 

3711 

014130 

001403 



BEO 

5S 

; BR IF YES 
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CZRXBF . 

P1 1 08-MAY-79 

14:22 

BINARY 

TO OCTAL 

(ASCII) AND TYPE 

37 ■* 2 

OKI 32 

005204 


4$: 

INC 

R4 

3713 

OKI 34 

052703 

000060 


BIS 

*'0,R5 

3714 

014140 

052703 

000040 

54 : 

BIS 

#' . R3 

3715 

0K144 

110337 

014210 


MOVB 

R3.84 

3716 

014150 

104401 

014210 


TYPE 

,84 

3717 

014154 

105337 

014212 

7$: 

DECB 

40CNT 

3718 

014160 

003347 



BGT 

24 

3719 

014162 

002402 



BL T 

64 

3720 

014164 

005204 



INC 

R4 

3721 

014166 

000744 



BR 

24 

3722 

014170 

012605 


6S: 

MOV 

< SP ) ♦ . R 5 

5723 

014172 

012604 



MOV 

( SP ) ♦ , R4 

3724 

014174 

012603 



MOV 

(SP) ♦ ,R5 

3725 

014176 

016666 

000002 000C04 


MOV 

2 ( SP ) ,4 (SP ) 

3726 

014204 

012616 



MOV 

(SP)* . (SP) 

3727 

014206 

000002 



RT1 


5728 

014210 

000 


84: 

.BYTE 

0 

3729 

014211 

000 



.BYTE 

0 

3730 

014212 

000 


40CNT : 

.BYTE 

0 

3731 

014213 

000 


SOF ILL: 

.BYTE 

0 

3732 

014214 

000000 


SOMODE : 

.WORD 

0 


85 


1 


SCO 0113 


;DON'T SUPPRESS ANYMORE 0'S 
; MAKE THIS DIGIT ASCII 
; MAKE ASCII IF NOT AlRE AD f 
; SAVE FOR TYPING 
; GO TYPE THIS DIGIT 
; COUNT BY 1 
; BR IF MORE TO DO 
;BR IF DONE 

; INSURE LAST DIGIT ISN'T A BLANK 
; GO DO THE LAST DIGIT 
; RESTORE R5 
; RESTORE R4 
; RESTORE R3 

; SET THE STACK FOR RETURNING 

* re turn 

■STORAGE FOR ASCII DIGIT 
;TERMINATOR FOR TYPE ROUTINE 
; OCTAL DIGIT COUNTER 
; ZERO FILL SWITCH 
; NUMBER OF DIGITS TO TYPE 
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3733 

3734 

T 71C 



.SBTTL SAVE AND RESTORE R0-R5 ROUTINES 



JfJJ 









3736 




•SAVE R0-R5 





3737 




•CALL: 





3738 




• SAVREG 





3739 




•UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 


3740 




• 





3741 




• TOP ( + 16, 





3742 




• *2 ( ♦ 1 8 ) 





3743 




* ♦4— R5 





3744 




* *6 R4 





3745 




• +8 — R3 





3746 




.♦10 R2 





3747 




• ♦ 12 — R 1 





3748 




• ♦14 — ro 





3749 









3750 

014216 


SSAVREG: 





3751 

014216 

010046 


MOV 

RO,-(SP) 


PUSH RO ON 

STACK 


3752 

014220 

010146 


MOV 

RI.-(SP) 


PUSH R1 ON 

STACK 


3753 

014222 

010246 


MOV 

R2.-(SP> 


PUSH R2 ON 

STACK 


3754 

014224 

010346 


MOV 

R3,-(SP) 


PUSH R3 ON 

STACK 


3755 

014226 

010446 


MOV 

R4,-(SP) 


PUSH R4 ON 

STACK 


3756 

014230 

010546 


MOV 

R5.-(SP) 


PUSH R5 ON 

STACK 


3757 

014232 

016646 

000022 

MOV 

22(SP) ,-CSP) 


SAVE PS OF 

MAIN FLOW 

3758 

014236 

016646 

000022 

MOV 

22 (SP) ,-CSP ) 


SAVE PC OF 

MAIN FLOW 

3759 

014242 

016646 

000022 

MOV 

22 CSP) ,-lSP) 


SAVE PS OF 

CALL 


3760 

014246 

016646 

000022 

MOV 

22 ( SP ) .-(SP) 


SAVE PC OF 

CALL 


3761 

014252 

000002 


RT1 





3762 









3763 




•RESTORE R0-R5 





3764 




•CALL* 





3765 




• RESREG 





3766 

014254 


SRESREG: 





3767 

014254 

012666 

000022 

MOV 

(SP) ♦ ,22(SP) 


RESTORE PC 

OF CALL 


3768 

014260 

012666 

000022 

MOV 

CSP)* , 22 ( SP ) 


RESTORE PS 

OF CALL 


3769 

014264 

012666 

000022 

MOV 

CSP)* , 22 ( SP ) 


RESTORE PC 

OF MAIN 

flow 

3770 

014270 

012666 

000022 

MOV 

CSP)* ,22CSP) 


RESTORE PS 

OF MAIN 

flow 

3771 

014274 

012605 


MOV 

CSP)* ,R5 


POP STACK 

INTO R5 


3772 

014276 

0126C4 


MOV 

(SP) ♦ ,R4 


POP STACK 

INTO R4 


3773 

014300 

012603 


MOV 

(SP)*.R3 


POP STACK 

INTO R3 


3774 

014302 

012602 


MOV 

(SPM.R2 


POP STACK 

INTO R2 


3775 

014304 

012601 


MOV 

(SP) ♦ ,R1 


POP STACK 

INTO R1 


3776 

014306 

012600 


MOV 

( SP ) ♦ , RO 


POP STACK 

INTO RO 


3777 

014310 

000002 


RTl 






SEQ OTU 
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3778 

3779 
X7AO 





•SBTTL 

TTY INPUT ROUTINE 



J F WV 

3781 

014312 

177560 



STKS: 

.WORD 

177560 


TTY KBD STATUS 

3782 

014314 

177562 



SUB: 

.WORD 

177562 


TTY KBD BUFFER 

3783 





.ENABl 

LSB 




378A 

T7ftC 










j r O; 










3786 





; * SOF TttARE SWITCH REGISTER CHANGE 

ROUTINE. 

3787 





; ‘ROUTINE IS 

ENTERED FROA THE 

TRAP HANDLER. AND WILL 

3788 





.-•SERVICE THE 

TEST FOR CHANGE 

IN SOFTWARE SWITCH REGISTER TRAP CAi 

3789 





.-•WHEN 

OPERATING IN TTY FLAG 

NODE 


3790 

014316 

022737 

000176 

001216 

SCKSWR: 

CUP 

A SWREG.SWR 


IS THE SOFT-SWR SELECTED? 

3791 

014324 

001074 




BNE 

15S 


BRANCH IF NO 

3792 

014326 

105777 

177760 



TSTB 

asus 


CHAR THERE? 

3793 

014332 

100071 




BPL 

15S 


IF NO, DON'T WAIT AROUND 

3794 

014334 

117746 

177754 



AOVB 

aSTKB.-(SP) 


SAVE tHE CHAR 

3795 

014340 

042716 

177600 



BIC 

i*C 1 77, (SP) 


STRIP-OFF THE ASCII 

3796 

014344 

022726 

000007 



CAP 

i7, (SPM 


IS IT A CONTROL G? 

3797 

014350 

001062 




BNE 

15S 


NO. RETURN TO USER 

3798 

014352 

123727 

015072 

000001 


CAPB 

SAUTOB.il 


ARE WE RUNNING IN AUTO-MODE? 

3799 

014360 

001456 




BEQ 

15S 


BRANCH IF YES 

3800 










3801 

014362 

104401 

015043 



TYPE 

.SCNTLG 


ECHO THE CONTROL-G ( a G> 

3802 

014366 

104401 

015050 


SGTSWR : 

TYPE 

.SASWR 


TYPE CURRENT CONTENTS 

3803 

014372 

013746 

000176 



NOV 

SWREG.-(SP) 


SAVE SWREG FOR TYPEOUT 

3804 

014376 

104402 




TYPOC 



GO TYPE— OCTAL ASC 1 1 (ALL DIGITS 

3805 

014400 

104401 

015061 



TYPE 

.SANEW 


PROAPT FOR NEW SWR 

3806 

014404 

005046 



19S: 

•CLR 

-ISP) 


CLEAR COUNTER 

3807 

014406 

005046 




CLR 

-<SP) 


THE NEW SWR 

3808 

014410 

105777 

177676 


7S : 

TSTB 

asus 


CHAR THERE? 

3809 

014414 

100375 




BPL 

7S 


IF NOT TRY AGAIN 

3810 










3811 

014416 

117746 

177672 



NOVB 

asuB.-isp) 


PICK UP CHAR 

3812 

014422 

042716 

177600 



BIC 

i*C 1 77, (SP) 


MAKE IT 7-BIT ASCII 

3813 










3814 










3815 










3816 

014426 

021627 

000025 


9S : 

CAP 

C SP ) ,125 


IS IT A CONTROL-U? 

3817 

014432 

001005 




BNE 

10S 


BRANCH IF NOT 

3818 

014434 

104401 

015036 



TYPE 

.SCNTLU 


YES. ECHO CONTROL-U (*U) 

3819 

014440 

062706 

000006 


20$: 

ADD 

A6.SP 


IGNORE PREVIOUS INPUT 

3820 

014444 

000757 




BR 

19S 


LET'S TRY IT AGAIN 

3821 










3822 










3823 

014446 

021627 

000015 


1 0S: 

CAP 

(SP),A15 


IS IT A <CR>? 

3824 

014452 

001022 




BNE 

16S 


BRANCH if NO 

3825 

014454 

005766 

000004 



T ST 

4CSP) 


YES, IS IT THE FIRST CHAR? 

3826 

014460 

001403 




BEQ 

IIS 


BRANCH IF YES 

3827 

014462 

016677 

000002 

164526 


AOV 

2csp).aswR 


SAVE NEW SWR 

3828 

014470 

062706 

000006 


IIS: 

ADD 

A6.SP 


CLEAR UP STACK 

3829 

014474 

104401 

013765 


1 4 S : 

TYPE 

.SCRLF 


ECHO <CR> AND <LF> 

3830 

014500 

123727 

015073 

000001 


CAPB 

SlNTAG.il 


RE-ENABLE TTY KBD INTERRUPTS? 

3831 

014506 

001003 




BNE 

15S 


BRANCH IF NOT 

3832 

014510 

012777 

000100 

177574 


AOV 

iioo.asus 


RE-ENABLE TTY KBD INTERRUPTS 

3833 

014516 

000002 



15S: 

RTI 



RETURN 
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SEQ 0116 


5854 

5855 

5856 

5857 

5858 

5859 

3840 

3841 
5842 
5845 

5844 

5845 

5846 

5847 

5848 

5849 

5850 

5851 

5852 
5855 

5854 

5855 

5856 

5857 

5858 

5859 

5860 


014520 

014524 

014550 

014532 

014536 

014540 

014544 

014550 

014552 

014554 

014556 

014560 

014564 

014570 

014572 

014576 


004737 

021627 

002420 

021627 

003015 

042726 

005766 

001403 

006316 

006316 

006316 

005266 

056616 

000707 

104401 

000720 


013704 

16$: 

JSR 

PC ,$TYPEC 

000060 


CMP 

(SP) ,#60 



BLT 

18$ 

000067 


CMP 

(SP) ,#67 



BGT 

18$ 

000060 


B1C 

#60, (SP)* 

000002 


T ST 

2 ( SP ) 



BEQ 

17$ 



ASL 

(SP) 



ASL 

(SP) 



ASL 

(SP) 

000002 

17$: 

INC 

2 ( SP > 

177776 


BIS 

-2(SP) , (SP) 



BR 

7$ 

013764 

18$: 

TYPE 

,$QUES 



BR 

20$ 


.DSABL 

LSB 



ECHO CHAR 
CHAR < 0? 

BRANCH IF YES 
CHAR > 7? 

BRANCH IF YES 
STRIP-OFF ASCII 
IS THIS THE FIRST CHAR 
BRANCH IF YES 
NO, SHIFT PRESENT 
CHAR OVER TO HAKE 
ROOM FOR NEW ONE. 
KEEP COUNT OF CHAR 
SET IN NEU CHAR 
GET THE NEXT ONE 
TYPE ?<CRXLF> 

SIMULATE CONTROL-U 


THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 
CALL: 


RuCHR 

RETURN HERE 


3861 

014600 

011646 



$RDCHR : 

MOV 

(SP),-(SP) 

3862 

014602 

016666 

000004 

000002 


MOV 

4 (SP) ,2 (SP) 

3863 

014610 

105777 

177476 


1$: 

TSTB 

a$TKS 

3864 

014614 

100375 




BPL 

1$ 

3865 

014616 

1 1 7766 

177472 

000004 


MOVB 

a$TKB,4(SP) 

3866 

014624 

042766 

177600 

000004 


BIC 

#*C<177>,4(SP) 

3867 

014632 

026627 

000004 

000023 


CMP 

4(SP),#23 

3868 

014640 

001013 




BNE 

3$ 

3869 

014642 

105777 

177444 


2$: 

TSTB 

a$TKS 

3870 

014646 

100375 




BPL 

2$ 

3871 

014650 

117746 

177440 



MOVB 

a$TKB.-(SP) 

3872 

014654 

042716 

177600 



BIC 

#*C1 77, (SP) 

5873 

014660 

022627 

000021 



CMP 

(SP)* ,#21 

3874 

014664 

001366 




BNE 

2$ 

3875 

014666 

000750 




BR 

1$ 

3876 

014670 

026627 

000004 

000140 

3$: 

CMP 

4 (SP) ,#140 

3877 

014676 

002407 




BLT 

4$ 

3878 

014700 

026627 

000004 

000175 


CMP 

4(SP) ,#175 

3879 

014706 

003003 




BGT 

4$ 

3880 

014710 

042766 

000040 

000004 


BIC 

#40,4(SP) 

5881 

014716 

000002 



4$: 

RTI 



INPUT A SINGLE CHARACTER FROM THE TTY 
CHARACTER IS ON THE STACK 
WITH PARITY BIT STRIPPED OFF 


PUSH DOUN THE PC 

SAVE THE PS 

WAIT FOR 

A CHARACTER 

READ THE TTY 

GET RID OF JUNK IF ANY 

IS IT A CONTROL-S? 

BRANCH IF NO 

WAIT FOR A CHARACTER 

LOOP UNTIL ITS THERE 

GET CHARACTER 

HAKE IT 7-BIT ASCII 

IS IT A CONTROL-Q? 

IF NOT DISCARD IT 
YES, RESUME 
IS IT UPPER CASE? 
BRANCH IF YES 
IS IT A SPECIAL CHAR? 
BRANCH IF YES 
HAKE IT UPPER CASE 
GO BACK TO USER 


THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
CALL: 

RDLIN ; ; INPUT A STR1N 

RETURN HERE ; ; ADORESS OF FI 


INPUT A STRING FROM THE TTY 

ADDRESS OF FIRST CHARACTER WILL BE ON 1 HE STACK 
TERMINATOR WILL BE A BYTE OF ALL O'S 


014720 010346 


SRDLlN: MOV RS.-(SP) 


; ; SAVE R3 
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NACY11 
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14:22 


TTY INPUT ROUTINE 


3890 

014722 

012703 

015026 


IS: 

MOV 

ISTTY1N.R3 

;GET ADDRESS 

3891 

014726 

022703 

015036 


2S: 

CUP 

ISTTYIN+8..R3 

; BUFFER FULL? 

3892 

014732 

101405 




BLOS 

4S 

;BR IF YES 

3893 

014734 

104407 




RDCHR 


;G0 READ ONE CHARACTER FRON THE TTY 

3894 

014736 

112613 




NOVB 

(SP)MR5) 

; GET CHARACTER 

3895 

014740 

122713 

000177 


1 0S: 

CNPB 

1177, (R3) 

; IS IT A RUBOUT 

3896 

014744 

001003 




BNE 

5S 

; SK IP IF NOT 

3897 

014746 

104401 

013764 


4S: 

TYPE 

.SQUES 

; TYPE A '?' 

3898 

014752 

000763 




BR 

IS 

; CLEAR THE BUFFER AND LOOP 

3899 

014754 

111337 

015024 


3S: 

MOV B 

(R3).9S 

;ECHO THE CHARACTER 

3900 

014760 

104401 

015024 



TYPE 

,9S 


3901 

014764 

122723 

000015 



CNPB 

1 15, (R3) + 

; CHECK FOR RETURN 

3902 

0147’* 

001356 




BNE 

2S 

;L00P IF NOT RETURN 

3903 

014772 

105063 

177777 



CLRB 

-KR3) 

; CLEAR RETURN (THE 15) 

3904 

014776 

104401 

013766 



TYPE 

,slf 

; TYPE A LINE FEED 

3905 

015002 

012603 




NOV 

(SP>^.R3 

; RESTORE R3 

3906 

015004 

011646 




NOV 

(SP).-(SP) 

; ADJUST THE STACK AND PUT ADDRESS OF THE 

3907 

015006 

016666 

000004 

000002 


NOV 

4(SP),21SP) 

; FIRST ASCII CHARACTER ON IT 

3908 

015014 

012766 

015026 

000004 


NOV 

*STTY1N,4(SP) 


3909 

015022 

000002 




RT1 


;RETURN 

3910 

015024 

000 



9S: 

.BYTE 

0 

; STORAGE FOR ASCII CHAR. TO TYPE 

3911 

015025 

000 




.BYTE 

0 

; TERNINATOR 

3912 

015026 

000010 



STTYIN: 

.BUB 

8. 

; RESERVE 8 BYTES FOR TTY INPUT 

3913 

015036 

052536 

005015 

000 

SCNTLU: 

.ASCII 

/*U/<15><12> 

.•CONTROL ’V* 

3914 

015043 

136 

006507 

000012 

SCNTLG: 

.ASCII 

/*G/<15><12> 

; CONTROL "G” 

3915 

015050 

005015 

053523 

020122 

SNSWR: 

.ASCII 

<1 5><12>/SWR - / 


3916 

015056 

020075 

000 






3917 

015061 

040 

047040 

053505 

SNNEU: 

.ASCII 

/ NEW = / 


3918 

015066 

036440 

000040 






3919 

015072 

000 



SAUTOB: 

.BYTE 

0 ; ; AUTO NODE FLAG 

3920 

015073 

000 



SINTAG: 

.BYTE 

0 -INTERRUPT NODE FLAG 


SEQ 0117 
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3921 

5922 

3923 

3924 

3925 
5926 

3927 

3928 

3929 

3930 

3931 

3932 

3933 

3934 

3935 

3936 

3937 

3938 

3939 

3940 

3941 

3942 

3943 

3944 

3945 

3946 


MACY11 30|( 1052) 29-MAY-7R 

TkAP DECODER 

.SBTTl TRAP DECODER 
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SEQ 0118 





o 

*— 

o 

o 

• 

THAT 

ROUTINE. 

015074 

010046 


STRAP: 

MOV 

RO.-(SP) 

015076 

016600 

000002 


MOV 

2(SP) ,R0 

015102 

005740 



TST 

-(RO) 

015104 

111000 



MOVB 

(RO).RO 

015106 

006300 



ASL 

RO 

015110 

016000 

015130 


MOV 

STRPAD(RO) ,^0 

015114 

000200 



RTS 

PO 


•THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE ,, TRAP , • INSTRUCTION 
•AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
; *0F THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 


SAVE RO 

GET TRAP ADDRESS 
BACKUP BY 2 

GET RIGHT BYTE OF TRAP 
POSITION FOR INDEXING 
INDEX TO TABLE 
GO TO ROUTINE 


; ; T H I S IS USE TO HANDLE THE ’'LETPRr' MACRO 


015116 

015120 

015126 


011646 

016666 000004 

000002 


000002 


STRAP2 : MOV 
MOV 
RTI 


(SP),-(SP) 

4(SP),2(SP) 


MOVE THE PC DOWN 
MOVE THE PSW DOWN 
RESTORE THE PSW 


.SBTTL TRAP TABLE 


.-•THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 


3947 

3948 

3949 

3950 

3951 

3952 

015130 

015132 

015116 

013534 

;*BY THE "TRAP" 

; ROUTINE 

STRPAD: .WORD 
STYPE 

INSTRUCTION. 

STRAP2 

; ; CALL=T YPE 

TRAP+1 (104401 ) 

TTY TYPEOUT ROUTINE 


3953 

015134 

014014 

STYPOC 

;;CALL=TYPOC 

TRAP+2U04402) 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

3954 

015136 

013770 

STYPOS 

; ; CALL=TYPOS 

TRAP+3( 104403) 

TYPE OCTAL NUMBER (NO LEADING 

ZEROS) 

3955 

015140 

014030 

STYPON 

; ; CALL=T YPON 

TRAP+4(104404) 

TYPE OCTAL NUMBER (AS PER LAST 

CALL) 

3956 

3957 

015142 

014366 

SGTSWR 

;;CALL=GTSWR 

TRAP+5(104405) 

GET SOFT-SWR SETTING 


3958 

3959 

015144 

014316 

SCKSWR 

;;CALL=CKSWR 

TRAP+6(104406) 

TEST FOR CHANGE IN SOFT-SWR 


3960 

015146 

014600 

SRDCHR 

; ; CALL=RDCHR 

TRAP+7( 1 04407) 

TTY TYPEIN CHARACTER ROUTINE 


3961 

015150 

014720 

SRDL1N 

;;CALL=RDLIN 

TRAP+10(104410) 

TTY TYPEIN STRING ROUTINE 


3962 

015152 

014216 

SSAVREG 

;;CALL=$XVREG 

TRAP+1 1 ( 1 0441 1 ) 

SAVE R0-R5 ROUTINE 


3963 

015154 

014254 

SRESREG 

; ; CALL=RESREG 

TRAP* 12(1 04412) 

RESTORE R0-R5 ROUTINE 


3964 

015156 

006544 

XSUBSCOPE ;;CALL= 

SUBSCOPE TRAP+1 3 

(104413) 
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3965 .SBTTL POWER DOWN AND UP ROUTINES 

3966 

3967 

3968 ; POWER DOWN ROUTINE 

3969 015160 012737 015324 000024 SPWRDN: MOV #SILLUP,3*PWRVEC ;;SET FOR FAST UP 

3970 015166 012737 000340 000026 MOV *340 ,3#PWRVEC+2 ;;PRI0:7 

3971 015174 010046 MOV RO.-(SP) ;;PUSH RO ON STACK 

3972 015176 010146 MOV RI.-(SP) ;;PUSH R1 ON STACK 

3973 015200 010246 MOV R2,-(SP) ;;PUSH R2 ON STACK 

3974 015202 010346 MOV R3,-(SP) ;;PUSH R3 ON STACK 

3975 015204 010446 MOV R4,-(SP) ;;PUSH R4 ON STACK 

3976 015206 010546 MOV R5.-(SP) ;;PUSH R5 ON STACK 

3977 015210 017746 164002 MOV aSWR.-(SP) ;;PUSH 3SWR ON STACK 

3978 015214 010637 015330 MOV $P,S$AVR6 ;;SAVE SP 

3979 015220 012737 015232 000024 MOV *SPWRUP.a*PWRVEC ; ; SET UP VECTOR 


3980 

3981 

3982 

015226 

015230 

000000 

000776 



HALT 

BR 

.-2 

; ;HANG UP 

3983 





• • 



3984 


. 



.•POWER UP ROUTINE 


3985 

015232 

012737 

015324 

000024 

SPURUP: MOV 

*SlLLUP.a*PWRVEC 

; ; SET FOR FAST DOWN 

3986 

015240 

013706 

015330 


MOV 

SSAVR6 , SP 

; ; GE T SP 

3987 

015244 

005037 

015330 


CLR 

SSAVR6 

; ; WA 1 T LOOP FOR THE TTY 

3988 

015250 

005237 

015330 


IS: INC 

SSAVR6 

; ; WAI T FOR THE INC 

3989 

015254 

001375 



BNE 

IS 

; ;0F WORD 

3990 

015256 

012677 

163734 


MOV 

(SP)*.aSWR ' 

; : POP STACK INTO 3SWR 

3991 

015262 

012605 



MOV 

(SP1+.R5 

; ; POP STACK INTO R5 

3992 

015264 

012604 



MOV 

(SPJ+.R4 

; ;POP STACK INTO R4 

3993 

015266 

012603 



MOV 

(SP> + ,R3 

; ; POP STACK INTO R3 

3994 

015270 

012602 



MOV 

(SPJ+.R2 

; ;POP STACK INTO R2 

3995 

015272 

012601 



MOV 

(SP1+.R1 

; ; POP STACK INTO R1 

3996 

015274 

012600 



MOV 

(SP)*.RO 

; ; POP STACK INTO RO 

3997 

015276 

012737 

015160 

000024 

MOV 

ISPWRDN.3IPWRVEC 

; ; SET UP THE POWER DOWN VECTOR 

3998 

015304 

012737 

000340 

000026 

MOV 

#340.a#PWRVEC+2 

; ; PR 10:7 

3999 

015312 

104401 



TYPE 


.•REPORT THE POWER FAILURE 

4000 

015314 

015332 



SPWRMG : .WORD 

SPOWER 

; ; POWER FAIL MESSAGE POINTER 

4001 

015316 

012716 



MOV 

(PO + .ISP) 

; ; RESTART AT RESTART 

4002 

015320 

001350 



SPWRAD : .WORD 

RESTART 

; ; RESTART ADDRESS 

4003 

015322 

000002 



RT1 



4004 

015324 

000000 



SILL UP : HALT 


; ; THE POWER UP SEQUENCE WAS STARTED 

4005 

015326 

000776 



BR 

.-2 

;; BEFORE THE POWER DOWN WAS COMPlE 

4006 

015330 

000000 



SSAVR6: 0 


; ; PUT THE SP HERE 

4007 

015332 

005015 

047520 

042527 

SPOWER: . ASCI Z 

<1 5><1 2>”P0WER" 


4008 

015340 

000122 






4009 





.EVEN 






015342 
015350 
01 5354 
015360 
01536A 
015370 
015372 


016637 
01 2746 
004737 
062716 
012666 
000207 
000000 
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4010 

401 1 
40i 2 

401 3 

4014 

401 5 
4,016 

401 7 

4018 

4019 
4.020 

4021 

4022 

4023 

4024 

4025 

4026 

4027 

4028 

4029 

4030 

4031 

4032 

4033 

4034 

4035 

4036 

4037 

4038 

4039 

4040 

4041 

4042 

4043 

4044 

4045 

4046 

4047 

4048 

4049 

4050 

4051 

4052 

4053 

4054 

4055 

4056 

4057 

4058 

4059 
<*060 

4061 

4062 

4063 

4064 

4065 


015376 
015400 
015404 
015410 
015414 
015416 
015420 
015426 
015432 
015436 
015440 
015442 
015444 
015446 
015450 
015452 
015454 
015456 
015460 
015462 
015464 
015470 
0154 72 
015474 
015476 
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SINGLE LENGTH BINARY TO DECIMAL ASC1Z ROUTINE 

.SBTTL SINGLE LENGTH BINARY TO DECIMAL ASC1Z ROUTINE 


‘'THIS ROUTINE UILL CONVERT A 16-BIT UNSIGNED BINARY NUMBER TO AN 
•UNSIGNED DECIMAL ASC1Z NUMBER. 

•CALL 

* MOV NUMBER. -(SP) ;;PUT BINARY NUMBER ON THE STACK 

* JSR PC.3#SSB2D ;;CAll 

* RETURN ;; ADDRESS OF THE 1ST ASCIZ CHAR. IS ON THE STACK 


SAVE BINARY NUMBER 
SET POINTER 

CALL DOUBLE LENGTH CONVERT 
ONLY ALLOW FIVE CHARACTERS 
PICKUP POINTER 
RETURN 


SEQ 0120 



• t 

0 

MOV 

NUMBER. -(SP) 


• t 

0 

JSR 

PC.9ISSB2D 


« * 

0 

RETURN 


000002 015372 

SSB2D: 

MOV 

2(SP) .IS 

015372 


MOV 

HS.-(SP) 

015376 


JSR 

PC .9ISDB2D 

000005 


ADD 

#5, (SP) 

000002 


MOV 

( SP ) ♦ . 2 ( SP ) 



RTS 

PC 

000000 

IS: 

.WORD 

0.0 


.SBTTL 

DOUBLE 

LENGTH BINARY 


104411 

016602 

012700 

010066 

012201 

012202 

012737 

012704 

012705 

005003 

161401 

005602 

161502 

002402 

005203 

000772 

062401 

005502 

062402 

022525 

052703 

110320 

005327 

000000 

001357 


;MH1S 

ROUTINE 

WILL CONVERT 

; ‘DECIMAL (ASCII) NUMBER. TH 

; ‘POSITIVE. 


.-•CALL 

• * 

0 

MOV 

#PNTR,-(SP) 

• * 

0 

JSR 

PC ,a#SDB2D 

• * 

0 

RETURN 


SDR2D: 

SAVREG 


000002 

MOV 

2(SP).R2 

015556 

MOV 

#SDECVL.RO 

000002 

MOV 

R0,2(SP) 


MOV 

(R2) ♦ ,R1 


MOV 

(R2M.R2 

000012 015474 

MOV 

#10. ,4S 

015506 

MOV 

ISTNPWR ,R4 

015510 

MOV 

ISTNPWR+2.R5 

IS: 

CLR 

R3 

2S: 

SUB 

(R4),R1 


SBC 

R2 


SUB 

(R5),R2 


BLT 

3S 


INC 

R3 


BR 

2S 

3S : 

ADD 

(R4M.R1 


ADC 

R2 


ADD 

(R4M.R2 


CMP 

(R5) ♦ . (R5 )♦ 
#'0,R3 

000060 

BIS 


MOVB 

R3. (ROM 


DEC 

(PCM 

4S: 

.WORD 

0 


BNE 

IS 


; .-POINTER TO LOU WORD OF BINARY NUMBER 

; ; T HE FIRST ADDRESS OF ASCIZ 
; ; 1 S ON THE STACK 


; ; SAVE REGISTERS 
; .-PICKUP THE DATA POINTER 
; ; GE T ADDRESS OF “SDECVL** STRING 
;;PUT ADDRESS OF ASCIZ STRING ON STACK 
;:PICKUP THE BINARY NUMBER 

; ; SET UP TO DO 10 CONVERSIONS 
; ; ADDRESS OF TEN POWER 

;; CLEAR PARTIAL 
;; SUBTRACT TEN POWER 


;;BR IF TEN POWER TO LARGE 
S ; ADD 1 TO PARTIAL 
;;LOOP 

; ; RESTORE SUBTRACTED VALUE 


; ; HOVE TO NEXT TEN POWER 
;; CHANGE PARTIAL TO ASCII 
; ; SAVE IT 
; ; DONE? 

; ;BR IF NO 
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4066 

015500 

105020 

CLRB 

(RO) ♦ 

; ; TERMINATOR 

4067 

015502 

104412 

RESREG 


; ; RESTORE REGISTERS 

4068 

015504 

000207 

RTS 

PC 

; ; RETURN 

4069 

015506 

145000 

STNPWR : 145000 


; ; 1 .0E09 

4070 

015510 

035632 

35632 



4071 

015512 

160400 

160400 


; : 1 -0E08 

4072 

015514 

002765 

2765 



4073 

015516 

113200 

113200 


; ; 1 .0E07 

4074 

015520 

000230 

230 



4075 

015522 

041100 

041100 


; ; 1 .0E06 

4076 

015524 

000017 

17 



4077 

015526 

103240 

103240 


; ; 1 . 0E05 

4078 

015530 

000001 

1 



4079 

015532 

023420 

23420 


; ; 1 .0E04 

4080 

015534 

000000 

0 



4081 

015536 

001750 

1750 


; ; 1 .0E03 

4082 

015540 

000000 

0 



4083 

015542 

000144 

144 


;;1.0E02 

4084 

015544 

000000 

0 



4085 

015546 

000012 

12 


; ; 1 . OE 0 1 

4086 

015550 

000000 

0 



4087 

015552 

000001 

1 


; ; 1 .OEOO 

4088 

015554 

OOOGOO 

0 



4089 

015556 

000014 

SDECVL: .BLKB 

12. 

; ; RESERVE STORAGE FOR ASC1Z STRING 


4090 



I 



CZRXBFO 

RX11 INTERFACE 

TEST 

F 10 

MAC Y 1 1 50AI1052) 29-MAY-79 08:23 PAGE 

94 

■) 

il 

CZRXBF . 

P11 

08-MAY-79 

14-22 

DOUBLE 

length 

BINARY TO DECIMAL 

ASCII CONVERT ROUTINE SEO 0122 1 

cz 

/.noi 











HUT 1 










y i 

A 092 










XEI 

4093 





; T YPE 

NUMERICAL ASCIZ STRING. RIGHT JUSTIFIED 


XFI 

4094 





; REPLACING LEADING ZEROS 

WITH SPACES. 


XHl 

4095 










XII 

4096 





.-FIRST 

ADDRESS OF ASCIZ 

STRING MUST BE ON TOP OF THE STACK 


XOl 

4097 










XP) 

4098 

015572 

010046 


RT JUST 


MOV RO.-(SP) 


SAVE RO 


XRt- 

4099 

015574 

016600 

000004 



MOV 4 (SP) ,R0 


PICK UP ADDRESS Of ASCIZ STRING 


XSA 

4100 

015600 

010037 

015632 



MOV R0.3S 


SAVE ADDRESS FOR TYPE OUT 


XS( 

4101 

015604 

105710 


IS: 


T STB (RO) 


IS THIS THE TERMINATOR 


XSC 

4102 

015606 

001406 




BEQ 2S 

CMP8 #'0.(R0) 


IF YES TYPE IT OUT 


XSL 

4103 

015610 

122710 

000060 




IS IT A ZERO 


XUR* 

4104 

015614 

001005 




BNE 4S 


IF NO GO PRINT IT 


XUT 

4105 

015616 

112720 

000040 



MOVB #* .(RO)* 


IF YES REPLACE IT WITH A SPACE 


XXP 

4106 

015622 

000770 




E° IS 


TEST NEXT CHAR. 


SAU. 

4107 

015624 

112740 

000060 

2S: 


Hj<3 I'O.-IRO) 


STRING OFF ALL ZEROS. PUT BACK The l AS T ONE 


SCH* 

4108 

015630 

104401 


4S : 


TYPE 


TYPE THE STRING 


SCK 

4109 

015632 

000000 


3S : 


OPEN 




SCH 

4110 

015634 

012600 




MOV (SP)*.RO 


•RESTORE RO 


SCN 

4111 

015636 

012616 




MOV C SP> ♦ , C SP) 


•RESTORE THE STACK 


ICR 

4112 

015640 

000207 




RTS PC 


.RETURN 

SDB 

4113 










IDE 

4114 





.TYPES 

16 BIT WORD IN DECIMAL 



SF1 

4115 










SF I 

4116 

015642 

012546 


SGLDEC 


MOV (R5)*,-(SP) 


PUT NUMBER TO BE TYPED ON STACK 


SGT 

41 ’ 7 

015644 

004737 

015342 



JSR PC .8ISSB2D 


CONVERT NUMBER TO DECIMAL 


SHD 

4118 

015650 

004737 

015572 



JSR PC ,RT JUST 


TYPE THE DECIMAL NUMBER 


SI L 

4119 

015654 

000205 




RTS R5 




SIN 


SlF 

SHA 

SMNI 

SWSI 

SNUI 

SO Cl 

sow 

5 PCX 
SPUI 
SPWI 
spui 

SPUI 

soul 

SRDI 

SRDI 

SRDl 

SRDI 

SRDI 

SRE! 

SR2/ 

SSAi 

SSA' 

SSB< 

SSE 

SSTI 

ssul 

SU| 



1 


I 
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CZRXBF.P11 08-MAY-79 14:22 MESSAGES SEO 0123 

4120 .SBTTL MESSAGES 

4121 

4122 

4123 01 5656 042524 052123 050040 MDTESTP: .ASC1Z "TEST PARAMETERS: " 

4124 015664 051101 046501 052105 

4125 015672 051105 055123 000040 

4126 

4127 015700 005015 042412 040522 MXEHEADER: .ASC1Z <15><12><12> "ERADR FAS1 F APT GOOD BAD PASS” 

4128 015706 051104 020040 040506 

4129 015714 052123 020040 043040 

4130 015722 050101 020124 020040 

4151 015730 020040 020040 020040 

4132 015736 043440 047517 020104 

4133 015744 020040 040502 020104 

4134 015752 020040 020040 040520 

4135 015760 051523 000 

4136 015763 125 042516 050130 MUNXDD: .ASCIZ 'UNEXPECTED D D MARK”<1 5>< 1 2> 

4137 015770 041505 042524 020104 

4138 015776 020104 020104 040515 

4139 C 1 6004 045522 005015 000 

4140 

4141 016011 104 042040 046440 MDDM1 S : .ASCIZ ”D D MARK M 1 S S 1 NG"< 1 5 >< 1 2> 

4142 016016 051101 020113 044515 

4K3 016024 051523 04711 1 006507 

4144 016032 000012 

4145 

4146 

4147 016034 040504 040524 020054 MDERHDR : .ASCIZ "DATA. NO STATUS ERROR” 

4148 016042 047516 051440 040524 

4’49 016050 052524 020123 051105 

4150 016056 047522 000122 

4151 

4152 016062 047440 020116 051 124 MTRK : . ASC 1 Z ” ON TRACK” 

4153 016070 041501 000113 

4154 

4155 016074 020040 051106 046517 MPRES : .ASCIZ ” FROM TRACK” 

4156 016102 052040 040522 045503 

4157 016110 000 

4158 

4159 016111 040 020057 042523 MSFCT : .ASCIZ ” / SECTOR” 

4160 016116 052103 051117 OOC 

4161 

4162 016123 015 020012 054502 MCOLMUN : .ASCIZ <15><12>” BYTE BAD GOOD”<15><12> 

4163 016130 042524 020040 040502 

4164 016136 020104 043440 047517 

4165 016144 006504 000012 

4166 

4167 016150 020040 020040 020040 TAB: .ASCIZ <40x40x40x40x40x40> 

4168 016156 000 

<•169 

4170 016157 040 000040 DBlSP: .ASCIZ <40><40> 

4171 

4172 016162 005015 000 MCRlF : .ASCIZ <15x12> 

4173 

4174 016165 015 042412 051 122 MERhEADER: .ASCIZ <15x12>"ERROR CONDITIONS: TEST PC 

4175 016172 051117 041440 047117 



ST I 1 

sr 

ST' 
st y 
sty 
sty 

ST Y 
STY 
STY 
STY 
SOF 
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CZRXBF.P11 08-MAY-79 14:22 MESSAGES SEG 0124 

4176 016200 044504 044524 047117 

4177 016206 03S123 020040 042524 

4178 016214 052125 050040 020105 

4179 016222 020075 000 

4180 

4181 016225 125 044516 020124 MUN1T0: .ASC1Z "UNI I 0 " 

4182 016232 020060 000 

4185 

4184 016255 125 044516 02012*. MUNI T 1 : .ASC1Z "UNIT 1 " 


4185 

016242 

020061 

000 




4186 







4187 

016245 

117 

0461 16 

020131 

NONLY: 

.ASCIZ "ONLY " 

4188 

016252 

000040 





4189 







4190 

016254 

054122 

051503 

036440 

MRXCS: 

.ASCIZ "RXCS = " 

4191 

016262 

000040 





4192 







4193 

016264 

052123 

052101 

051525 

MASTAT : 

.ASCIZ "STATUS A - 

4194 

016272 

040440 

036440 

000040 



4195 







4196 

016300 

052123 

052101 

051525 

MBSTAT : 

.ASCIZ "STATUS B - 

4197 

016306 

041040 

036440 

000040 




4198 

4199 016314 005015 000012 DBLLF : .ASCIZ <15><1 2><12> 

4200 

4201 016320 047516 044440 052116 MINTER: .ASCIZ "NO INTERRUPT AT DONE ERROR" 

4202 0 T 6526 051105 052522 052120 

4203 016334 040440 020124 047504 

4204 016342 042516 042440 051122 

4205 016350 051117 000 

4206 

4207 016353 125 045516 047516 MUKN1NT: .ASCIZ "UNKNOWN INTERRUPT" 

4208 016360 047127 044440 052116 

4209 016366 051105 052522 052120 

4210 016374 000 

4211 

4212 016375 124 052117 046101 MERCT: .ASCIZ "TOTAL READ CHECK ERRORS - " 

4213 016402 051040 040505 020104 

4214 016410 044103 041505 020113 

4215 016416 051105 047522 051522 

4216 016424 036440 000040 

4217 

4218 016430 044506 046114 052502 MFlL: .ASCIZ "FllLBUFFER " 

4219 016436 043106 051105 000040 


4220 








4221 

016444 

046505 

052120 

041131 

MEMPTY: 

.ASCIZ 

"EMPTYBUFFER " 

4222 

016452 

043125 

042506 

020122 




4223 

016460 

COO 






4224 








4225 

016461 

040 

051124 

041501 

MlIMTRK : 

.ASCIZ 

" TRACKS 52.53.114.0 

4226 

016466 

051513 

032440 

026062 




4227 

016474 

031465 

030454 

032061 




4228 

016502 

030054 

020040 

000 




4229 







"0D-" 

4230 

016507 

117 

036504 

000 

MOD: 

.ASCIZ 


4231 




1 
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MESSAGES 


4,252 

016513 

040 

044440 

056504 

MID: 

. ASC1Z •* I0=" 

4,233 

016520 

000 





4,234, 







4,235 

016521 

040 

043040 

051111 

M f I RST : 

.ASCI Z " F IRST =" 

4,236 

016526 

052123 

000075 




',237 







4,238 

016532 

020040 

040514 

052123 

MlAST: 

.ASCIZ '* last--" 

4.239 

016540 

000075 





4,24,0 







4,24,1 

016542 

051103 

020103 

051105 

MBADCRC: 

.ASCI Z "CRC ERROR NO DATA ERROR" 

4,24,2 

016550 

047522 

020122 

047516 



4.24,3 

016556 

042040 

052101 

020101 



4.24A 

016564 

051105 

047522 

000122 



4,24,5 







4,246 

016572 

042522 

042101 

000040 

MRF AD : 

.ASCIZ "READ " 

4247 







4248 

016600 

040504 

040524 

041440 

MCRC: 

.ASCIZ "DATA CRC ERROR" 

4249 

016606 

041522 

042440 

051122 



4250 

016614 

051117 

000 




4251 







4252 

016617 

123 

042505 

020113 

MSEEK: 

.ASCIZ "SEEK ERROR" 

4253 

016624 

051105 

047522 

000122 



4254 







4255 

016632 

051127 

052111 

020105 

MURITE: 

.ASCIZ '■UR I TE " 

4256 

016640 

000 





4257 







4258 

016641 

120 

051101 

05211 1 

MPAR : 

.ASCIZ "PARITY ERROR" 

4259 

016646 

020131 

051105 

047522 



4260 

016654 

000122 





4261 







4262 

016656 

05110S 

047522 

020122 

MNOf LAG: 

.ASCIZ "ERROR FLAG ERROR" 

4263 

016664 

046106 

043501 

042440 



4264 

016672 

051122 

051117 

000 



4265 







4266 

016677 

102 

042101 

000 

MBAD: 

.ASCIZ "BAD" 

4267 







4268 

016703 

040 

000 


SPACE: 

.ASCIZ <40> 

4269 






.ASCIZ "GOOD" 

4270 

016705 

107 

047517 

000104 

MGOOD : 

4271 







4272 

016712 

020040 

044103 

0415C5 

MSUM: 

.ASCIZ " CHECK SUM " 

4273 

016720 

020115 

052523 

020115 



4274 

4275 

4276 

016726 

000 





016727 

015 

051012 

030530 

MRX 1 1 : 

.ASCIZ <15><12>"RX11 / RXVl 1 " 

4277 

016734 

020061 

020057 

054122 



4278 

4279 

4280 

016742 

030526 

000061 




016746 

005015 

041412 

051132 

MREV : 

.ASCIZ <15><12x12> "CZRXBFO RX11 INTERFACE TEST" <.15x1 2> 

4281 

016754 

041130 

030106 

051040 



4282 

016762 

030530 

020061 

0471 11 



4283 

016770 

042524 

043122 

041501 



4284 

016776 

020105 

042524 

052123 



4285 

4286 

4287 

017004 

005015 

000 




017007 

015 

052412 

042516 

L0C4M : 

.ASCIZ <1 5><1 2>"UNE XPE CTED TRAP TO LOC. 4 OCCURRED" 


J 10 
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RXl 1 INTERFACE 
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P11 1 

38-HAY-79 
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MESSAGES 



4288 

017014 

050130 

041505 

042524 




4289 

017022 

020104 

051124 

050101 




4290 

017030 

052040 

020117 

047514 




4291 

017036 

027103 

032040 

047440 




4292 

017044 

041503 

051125 

042522 




4293 

017052 

000104 






4294 








4295 

017054 

005015 

047125 

054105 

LOCIOM: .ASCIZ 

<1 5><12>"UNEXPtCTED TRAP TO IOC. 10 

OCCURRED 

4296 

017062 

042520 

052103 

042105 




4297 

017070 

052040 

040522 

020120 




4298 

017076 

047524 

046040 

041517 




4299 

017104 

020056 

030061 

047440 




4300 

017112 

041503 

051125 

042522 




4301 

Cl 71 20 

000104 






4302 








4303 

017122 

050075 

000103 


PCM: .ASCIZ 

..-pc* 


4304 








4305 

017126 

005015 

051124 

041501 

0D2BIG: .ASCII 

< 1 5>< 1 2>"T RACK LIMITS SELECTED OUT OF RANGE" 

4306 

017134 

020113 

044514 

044515 




4307 

017142 

051524 

051440 

046105 




4308 

017150 

041505 

042524 

020104 




4309 

017156 

052517 

020124 

043117 




4310 

017164 

051040 

047101 

042507 




4311 

017172 

005015 

042504 

040506 

•ASCIZ 

< 1 5><12>"DEF AULT ING TO " 


4312 

017200 

046125 

044524 

043516 




4313 

017206 

052040 

020117 

000 




4314 








4315 

017213 

015 

051412 

041505 

S2BIG: .ASCII 

<15><12>"SEC10R LIMITS SELECTED OUT 

OF RANGE 

4316 

017220 

047524 

020122 

044514 




4317 

017226 

044515 

051524 

051440 




4318 

017234 

046105 

041505 

042524 




4319 

017242 

020104 

052517 

0201 24 




4320 

017250 

043117 

051040 

047101 




4321 

017256 

042507 






4322 

017260 

005015 

042504 

040506 

.ASCIZ 

<15x12>"DEFAULTING TO " 


4323 

017266 

046125 

044524 

043516 




4324 

017274 

052040 

020117 

000 




4325 








4326 

017301 

015 

041412 

052501 

DOLOAD: .ASCII 

<15><12>"CAUT ION - IF YOU DESIRE TO 

TES T UNI 

4327 

017306 

044524 

047117 

026440 




4328 

017314 

044440 

020106 

047531 




4329 

017322 

020125 

042504 

044523 




4330 

017330 

042522 

052040 

020117 




4331 

017336 

042524 

052123 

052440 




4332 

017344 

044516 

020124 

060 




4333 

017351 

015 

051012 

050105 

.ASCII 

< 1 5><1 2>"REPlACE LOAD MEDIUM WITH A 

SCRATCH 

4334 

017356 

040514 

042503 

046040 




4335 

017364 

040517 

020104 

042515 




4336 

017372 

044504 

046525 

053440 




4337 

017400 

052111 

020110 

020101 




4338 

017406 

041523 

040522 

041524 




4339 

017414 

020110 

044504 

045523 




4340 

017422 

052105 

042524 





4341 

017426 

005015 

044124 

047105 

.ASCIZ 

<15x12> THEN PRESS CONTINUE <15xl2> 

4342 

017434 

050040 

042522 

051523 




4343 

017442 

041440 

047117 

044524 





SEQ 0126 


1 
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4344 

4345 

4346 
434? 

i 1/ ft 

017450 

052516 006505 

000012 

.EVEN 

4349 

4350 

4351 

4352 

4353 

017456 

000200 

• § 

; T HE FOLLOWING LOCATIONS ARE USED FOR DATA STORAGE .RE TRY COUNTERS 
; ACCESS COUNTERS ETC. 

BUfADR: .BLKB 200 

4354 

4355 


000001 

.END 






















L 10 








CZrtXBFO RXl 1 INTERFACE 

TEST 

MAC Y 1 1 

30A(1052) 

29-HAY 

-79 08:23 PAGE 

101 







CZRXBF.P1T 08-HAY-79 

14:22 


CROSS REFERENCE 

TABLE — 

USER SYH60LS 






SEQ 0128 

ADJSUH 011014 

2322 

2395 

2413 

2751 

3030 

3048# 








ASTAT 01 21 74 

2808 

2917 

2924 

2973 

2991 

3159* 

3162 

3165 

3242# 

3246* 

3256 



BADBtT 011502 

3041* 

3042 

3043 

3089 

3137# 









B 1 T 0 = 000001 

176# 

2924 












B1T00 = 000001 

166# 

176 












81101 = 000002 

165# 

175 












BIT 02 = 000004 

164# 

174 












B1T03 = 000010 

163# 

173 












BIT 04 = 000020 

162# 

172 












BIT 05 = 000040 

161# 

171 












B1T06 = 000100 

160# 

170 












BIT07 = 000200 

159# 

169 












BIT 08 = 000400 

158# 

168 












BIT 09 = 001000 

157# 

167 












Bill = 000002 

175# 

2808 

2917 











BIT 10 = 002000 

156# 













Bill 1 = 004000 

155# 













BIT 1 2 = 010000 

154# 













BIT13 = 020000 

153# 

2873 












BIT 14 = 040000 

152# 

450 

1432 

3433 

3447 









BIT 1 5 = 100000 

151# 

455 

461 

469 

3022 

3467 

3505 







BIT2 = 000004 

174# 

3162 












B I T 3 = 000010 

173# 













B I T 4 = 000020 

172# 

3234 

3573 











BIT 5 = 000040 

171# 

1540 

2637 











B1T6 - 000100 

170# 

669 

829 

1083 

1244 

1288 

1302 

1342 

1360 

1402 

1421 

1489 

1593 


1832 

1851 

1957 

2973 

2991 

3424 

3429 

3435 






BIT 7 = 000200 

169# 

672 

673 

1383 

1492 

1493 

1597 

2448 

2454 

3029 

3084 

3510 

3575 

BIT8 = 000400 

168# 

547 

831 

865 

2529 

2561 

2980 

2993 

3068 

3184 




81 T9 = 001000 

167# 













8PTVEC= 000014 

183# 













BRLEV 001214 

371# 

2492 












BSTAT 012176 

5192* 

3243# 

3254* 

3262 










BUFADR 017456 

1625 

1728 

3048* 

3049* 

3053* 

3056* 

3057 

3277 

3379 

4353# 




BUSERR 006156 

211 

2460# 












BYTECN 011500 

2754* 

2762* 

3027* 

3045* 

3085 

3102* 

3136# 







CATERR 003060 

1171 

1176* 

1179# 

1191* 










CCOUNT 002554 

439* 

834 

837* 

838 

840* 

878# 

2528* 







CEXIT 004274 

1066 

1304 

1361 

1422 

1608 

1618 

1725 

1811 

1 8 1 2# 





CKBYTE 010764 

3041# 













CICSUH 011104 

3031* 

3042* 

3050* 

3051* 

3052* 

3053 

3054* 

3055* 

3056 

3060# 

3118 



CXSUR = 104406 

845 

892 

2525 

2566 

2572 

2622 

2671 

2771 

2777 

2826 

2831 

2856 

2864 


2872 

2876 

2939 

2944 

2955 

2960 

2975 

2983 

2994 

3070 

5098 

3110 

5124 


3145 

3151 

3169 

3177 

3193 

3959# 








COHHWO 007662 

2333 

2793 

2851# 

2896 










CONIIO 010550 

2972 

2991# 












CONT1 1 010516 

2977 

2983# 

2996 











CON1 13 007340 

2779 

2781# 












C0NT14 007610 

2833 

2835# 












CONTI 5 010340 

2946 

2948# 












C0NT16 010412 

2962 

2964# 












CONTI 7 010530 

2985 

2987# 






- 






CONT20 011324 

3100 

3102# 












C0NT21 011550 

3153 

3155# 












C0NT4 007326 

2773 

2777# 












COUNT 012476 

3288 

3363# 
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HACY11 30AU052) 29-HAY-79 08 

CROSS REFERENCE TABLE - 


CPUPRI 

006226 

1335 

CR 

000015 

91* 

CRCER 

010262 

2925 

CRLF = 

000200 

92* 

OATABY 

012350 

3292* 

3378 

OATACX 

007732 

2862* 

OATACR 

010356 

2934 

DATAER 

011136 

3044 

DAT AO 

012354 

3282 

DATA1 

012366 

3283 

DBLLF 

016314 

4199* 

DBLSP 

016157 

3088 

DDCHK 

010436 

2908 

DDERR 

010500 

2980* 

DD1SP = 

177570 

98* 

DEATH 

003062 

1175 

DEX1T 

004306 

1815* 

DING 

006476 

2562 

D1SPLA 

001220 

379* 

D1SPRE 

000174 

238* 

DONE 

012754 

2744 

DQNEB1- 

000040 

198* 

DRVSWP 

007040 

2428 

DSWR = 

177570 

97* 

DTESTP 

001212 

369* 

DOLOAD 

017301 

4326* 

EB1E = 

000103 

200* 

ENPBUF 

010672 

2936 

ENPDON 

011334 

3032 

ENPER 

011106 

3033 

ENPFLA 

010756 

3038* 

ENTVEC* 

000030 

186* 

EPCSCO 

006522 

2518* 

ERCNTR 

011506 

2937 

ERRSG 

010614 

2978 

ERRORS 

006520 

548* 

ERRVEC* 

000004 

179* 

EXIT 

011474 

3026 

FAST 

002560 

550* 

FBEB 

004112 

1626 

FB1E = 

000101 

199* 

FlLLBU 

007172 

2751* 

FILLDO 

007360 

2752 

FILLER 

007250 

2753 

F1LLFL 

007230 

2759* 

FIRST 

001202 

302* 

F1RSTT 

002206 

756* 

FLOATO 

012376 

3284 

FLOAT 1 

012440 

3285 

FUNCT1 

007730 

2330* 

GETPAT 

012306 

1624 

GETSEC 

013450 

2750 

GETTPA 

013132 

2707 

GETUNI 

012662 

2319 

GNS - 

#••••• u 

3952 


1394 

2492* 



3637 

2933* 

3647 



3608 

3647 



3301* 

3311* 

3317* 

3327* 

2891* 

2935* 

3105 


2938 

3068* 

3301* 

3311* 

2955* 



3092 

2971* 

2999 

3233 

4170* 


379 

1185* 

1897 

2031 

2085 

2137 

2572* 

301 3 



420* 

420 

3445* 

2797 

2718* 

2900 

3167 


378 




446 

450 

453 

472 

3037 

3024* 

3105* 

3064 

3128 

3132 

3062* 

3039 

3046 

3103 


2519* 

2582* 

2614 

3108 

3028* 

3069* 

3075 

2997 

3003* 

3079 

3148 

2520* 

2581* 

2587 

2596* 

3130 

3133* 



757* 

880* 

2541 


1635* 

2758 

1641 

1729 

2325 

2768 

2783 

2817 

2840 

2786* 

2765* 

2813 



2760 

2763 



303 

508 

510* 

513 

873 

3317* 

3335* 

2414* 

2789* 

2792* 

2851* 

2321 

2394 

2412 

2718 

2890 

3566* 



2721 

2739 

3486* 


2411 

2706 

2720 

2724 

3953 

3954 

3955 

3957 


H 10 

23 PAGE 102 
USER SYMBOLS 


SEO 0129 


3335* 3344* 3346* 3355* 3363* 3364* 3373* 


2272 2309 2332 2400 2416 2429 2455 


866 


3114 3139* 

3197 

2602 3182* 


516 

530* 

3548 

2852 

2861# 

2895* 

2736 

3277# 


2738 

3424# 


3959 

3960 

3961 


3550* 3553 3556 

3199 

3962 3965 3964 


5570 


3377 


CZRXBFO 

RX11 INTERFACE 

TEST 

CZRXBF . 

P11 08-HAY-79 

14:22 

GOODS t 

011504 

3093* 

GTSWR = 

104405 

426 

HANGER 

007004 

441* 

HANGPL 

007006 

442* 

HERE 

002500 

857 

HLT10 

010336 

2947# 

HLT 1 2 

010410 

2963# 

HLT13 

010526 

2986# 

HL114 

011322 

3101# 

HLT 1 5 

011546 

3154# 

HLT6 

007336 

2780# 

HLT7 

007606 

2834# 

HOMt 

007734 

2835 

HT 

0000 11 

89# 

HUNGUP 

006650 

2641 

ID 

001201 

301# 

1LLADR 

005134 

1914 

1NCERR 

006272 

2520# 

1N1TSE 

013352 

2749 

1NITTR 

013000 

2705 

intlea 

013446 

3559* 

1NTSER 

011554 

2306 

10TVEC* 

000020 

184# 

KRXVEC 

001204 

305# 

LAST = 

001203 

303# 

LF = 

000012 

90# 

LIMITS 

001640 

477# 

lihtrk 

013166 

3488 

LOAD 

012536 

3302 

LOCKUP 

002604 

754 

LOCI ON 

017054 

2476 

L0C4M 

017007 

2460 

LOG1CA 

002470 

231 

MA8ELL 

006516 

842 

MASTAT 

016264 

3255 

MB AD 

016677 

3120 

MBADCR 

016542 

2942 

MBSTAT 

016300 

3261 

HCOLMU 

016123 

3083 

MCRC 

016600 

2958 

MCRLF 

016162 

476 

3123 

MDDM1S 

016011 

2979 

MDERHD 

016034 

3080 

MDTEST 

015656 

471 

MEHPTY 

016444 

3063 

MERCT 

016375 

3113 

MERHEA 

016165 

3003 

Mf IL 

016430 

2766 

MF1RST 

016521 

515 

MGOOD 

016705 

3122 

MHUNGP 

006722 

2675 

MID 

016513 

494 

miltst 

002564 

875 

MINTER 

016320 

3149 

mlast 

01&532 

520 


MACYll 30AU052) ' 29-HAY-79 08 
CROSS REFERENCE TABLE - 

3095 31 38# 

3957# 

555* 830* 854* 2639* 

556* 665* 2640* 2670* 

863# 


2864# 

2881 



3606 

2648# 

3647 



485 

487 

495 

3470 

2047 

2100 

2141# 

2146 

2521 




2889 

3548# 



2719 

2737 

3462# 


3564# 

3571 

3572* 


2426 

2451 

3155 

3159# 

1019 

1073 

1237 

1278 

511 

513 

521 

3551* 

3641 

3647 



504 

3502# 

3322 

3345 

3365 

3374 


8920 

4295# 

4287# 

859# 

2575 2578# 

4193# 

4266# 

4241# 

4196# 

4162# 

4248# 

525 836 848 2533 

3150 3173 3181 3196 

4141# 

4147# 

4123# 

4221# 

4212# 

4174# 

4218# 

4235# 

4270# 

2685# 

4232# 

884# 

4201# 

4238# 


N 10 

23 PAGE 103 
USER SYMBOLS 


SEO 0130 


2669* 2694* 2698# 2786* 2799* 2892* 

2695* 2699# 


1320 1376 2305 2425 2450 

3552 3568 

3377# 


2902* 


2776 2848 2943 2959 2982 

3204 3218 3264 4172# 


3012 


3081 


3097 


CZRXBFO 

R X 1 1 INTERFACE 

TEST 

HACYl 1 

30AC1052) 

29-AAY 

-79 08 

CZRXBF . 

P11 08-AAY-79 

14:22 


CROSS REFERENCE 

TABLE - 

AL1ATR 

016461 

480 

4225* 




ANOFlA 

016656 

3180 

4267* 




aoo 

016507 

489 

4230* 




AONLY 

u 16245 

467 

4187* 




AORETE 

002200 

754* 

1813 

1816 

2674 

2683 

APAR 

016641 

2775 

3217 

4258 * 



APASS 

006753 

849 

2690 * 

3008 



APRES 

016074 

2843 

4155* 




ARE AO 

016572 

2920 

2928 

4246* 



AREV 

016746 

412 

4280* 




ARXCS 

016254 

3198 

3212 

4190* 



ARX11 

016727 

3209 

4276* 




ASECT 

016111 

3226 

4159* 




ASEEK 

016617 

2842 

4252* 




ASUA 

016712 

3117 

4272* 




ATRK 

016062 

3221 

4152* 




AUKN1N 

016353 

3172 

4207* 




AUM1T0 

016225 

3236 

4181* 




AUN111 

016235 

466 

3238 

4184* 



AUNXOO 

015 7 63 

2998 

4136* 


4255* 


AUR1TE 

016632 

2811 

2822 

2829 


AX 

002562 

833* 

841 

88 2* 

1812* 

1815* 

AXEHEA 

015700 

2531 

4127* 




NEXTRO 

010160 

2784 

2907 

2910 

2912* 

2922 

noerty 

011312 

3072 

3076 

3098* 



NOINTE 

011510 

2801 

2904 

3145* 



NOAORE 

002312 

766 

829* 




NOPRIN 

006446 

2527 

2561* 




NOPRNT 

011754 

3193* 





NOSCOP 

006532 

2596* 

2624 




NXREAO 

011456 

3065 

3109 

3126 

3129* 


00 

001200 

300* 

301 

470* 

477 

487 

3505* 

3507 

3510* 

3524* 

3527 

0028 16 

017126 

500 

4305* 




0K2G0 

003064 

1178 

1190* 


2774 

3011 

OPEN r 

000000 

205* 

852 

2558 

PARTES 

007300 

2769 

2771* 

2814 

2923 

3066 

PART YP 

012050 

3190 

3212* 

3252 


2556 

PASS 

002556 

440* 

843* 

850 

879* 

PAT 

012352 

1616* 

1803* 

1808* 

2320* 

2391* 

PATGEN 

012360 

3302* 

3303 

3312 



PATTER 

012330 

3281 

3282* 




PAT 125 

012446 

3286 

3344* 




PAT314 

012466 

3287 

3355* 




PCA 

017122 

2467 

2484 

4303 * 

2812* 

2922* 

PCONT 

007354 

2767* 

2782 

2784* 

PCSCOP 

006604 

550 

756* 

757 

2544 

2597* 

PIRQ - 

177772 

96* 





P1RQVE* 

00024 C 

190* 




3064* 

PLOOP 

007350 

2768* 

2783* 

2813* 

2921* 

PRESTR 

013156 

2844 

2883* 

3486* 

3494* 

3525 

PRETES 

002052 

526 

54 7* 




PRO = 

000000 

113* 





PR1 = 

000040 

114 * 





PR2 * 

000100 

115* 





PR3 = 

000140 

116* 






B 11 

23 PAGE 104 
USER SYABOLS 


SEO 0131 


2930 

2950 

2967 

2990 




490 

3537 

503* 

3539* 

3464* 

3465 

3468 

34 72 

3476* 

3087 

3116 

3240 

4109 




3009 

2393* 

2408* 

2410* 

2424* 

2437* 

2449* 

3279 

3065* 

2625 

2627* 

2790 

* 

2906 

2971 

3004 



3S02 


3293* 


CZRXBfO RX 1 1 INTERFACE TEST KACt 1 1 30A(1052> 29-HAY-79 08 

CZRXBF.P11 08-HAT -79 14:22 CROSS REFERENCE TABLE - 


PR4 

000200 

117# 

1329 




PR5 = 

0002<.0 

118# 

1388 




PR6 = 

000300 

119# 





PR7 = 

000340 

120# 

212 

214 

218 

220 



1264 

1282 

1291 

1324 

1345 

PS 

177776 

93# 

94 




PSW =• 

177776 

94# 

1329* 

1388* 



PTTP1 

007312 

2766* 

2774# 

2811* 

2920* 

3063* 

PWRVEC= 

000024 

185# 

3969* 

3970* 

3979* 

3985* 

RANDAT 

012516 

3289 

3372# 

3375 



RANGEN 

012566 

3372 

5387# 




RANUH 

012660 

3373 

3402* 

3407# 



RANT 

012654 

437* 

5388 

3394* 

3399 

3405# 

RAN2 

012656 

438* 

3389 

3396 

3401* 

3406# 

ROCHR = 

104407 

3893 

3960# 




RDCODE 

01 2200 

2875 

3246# 




RDDONE 

010136 

2893 

2906# 




RDER = 

000017 

197# 

3185 

3247 



RDERR 

010170 

2894 

2916# 




RD1E = 

000107 

202# 

2895 




R0L1N = 

104410 

3961# 





RDONLY 

007010 

2308 

2705# 




READ 

010042 

2708 

2889# 

3023 



READCH 

010662 

2723 

2726 

2741 

3022# 


REBEG1 

002504 

675 

753 

863 

865# 

2468 

RECAL = 

040001 

204# 

2396 

2867 

* 7 


REREAD 

010052 

2891# 

2921 

2927 

2951 

2968 

RESERR 

006202 

213 

2476# 




RESREG* 

104412 

3963# 

4067 




RESTAR 

001350 

405 

431# 

3211 

4002 


RESVEC* 

000010 

180# 





RETURN 

010612 

2974 

2992 

3000# 



RT JUST 

015572 

4098# 

4118 




RTN 

010040 

2866 

2884# 




RTSPC 

006620 

2631 

2633# 



871 

RXCS 

001206 

307# 

435 

552 

829* 


1288* 

1302* 

1342* 

1360* 

1402* 



1642 

1727* 

1826* 

1845* 

1911* 



2074* 

2097* 

2099* 

2103 

2126* 



2324* 

2336 

2339* 

2396* 

2630 



3037* 

3038 

3160 

3167 

3185* 

RXDB 

001210 

349# 

435* 

436* 

667 

974 

1976 

1986 

2064 

2078 

2116 



2256 

2264 

2327* 

2338 

2342 



3250 

3254 




RXERRO 

011700 

3161 

3179 

3182# 

3183 


RXPWR 

012034 

3164 

3209# 




SAVREG- 

104411 

3962# 

4041 




SA200 

001232 

245 

409# 

876 



SA202 

001222 

246 

403# 




SC0P1N 

006564 

2588 

2615 

2622# 

1827 

1846 

SDN 

006622 

1433 

1549 

1640 

2195 

2250 

2334 

2340 

2397 

SECCNT 

01 34A2 

2802* 

2912* 

3024 

3129* 

3552* 

SEClHT 

001744 

„ 481 

„ 499 

508# 



SEE ICE R 

007554 

2823 

2826# 

2929 




C 11 

23 PAGE 105 
USER SYH80LS 


SEQ 0132 


2 22 
1380 

224 

1405 

432 

2307 

1023 

2427 

1031 

2452 

1077 

1126 

1241 

3997* 

3998* 








2485 


2989 

3127 


918* 

920 

1083* 

1197 

1199 

1244* 

1249 

1251 

1421* 

1432* 

1436 

1539* 

1540 

1542 

1552 

1623* 

1913* 

1917 

1969* 

1972 

1975 

2044* 

2046* 

2050 

2166 

2176* 

2182 

2191 

2198 

2249* 

2252 

2255 

2637 

3213 

2758* 

3247* 

2759 

2797 

2852* 

2867* 

2870 

2900 

1487 

1591 

1629* 

1644 

1735 

1830 

1849 

1955 

2130 

2148* 

2156* 

2183 

2185* 

2192 

2194* 

2238 

2761* 

2855* 

2858* 

3041 

3159 

3188 

3192 

3246 

1970 

2637# 

3553* 

2075 

2868 

3554* 

2127 

3186 

3555* 

2145 

3248 

3562# 

2153 

2162 

2180 

2189 


CZRXBfO RX11 INTERFACE 

TEST 

HACY11 

30A (1052 ) 

29-NAY 

-79 08 

CZRXBF.P11 08-NAY-79 

14:22 


CROSS REFERENCE 

TABLE - 

SEKRTY 007630 

"2817* 

2838 

2840* 

2927* 


SEKTYP 007634 

2830 

2842* 




SEQUEN 013164 

479* 

2448* 

2454* 

3462 

3467* 

SEQ1 013264 

3489 

3524* 




SEQ2 013320 

3490 

3537* 




SGLOEC 015642 

851 

2557 

3010 

3086 

3115 

SPACE 016703 

2540 

2543 

2546 

2549 

2552 

STACK = 001200 

84* 

298 

404 

411 

758 

STKLNT= 177774 

95* 





SIR 006606 

1635 

2141 

2149 

2157 

2177 

STYP1 007566 

2822* 

2829* 

2928* 



SUBSCO= 104413 

958 

1016 

1190 

1229 

1256 


1964 

1981 

2057 

2070 

2110 

SUN 012564 

3050 

3278* 

3377* 

3385 * 


SWHLT1 007576 

2828 

2831* 




SWR 001216 

378* 

410* 

415 

419* 

424 


2623 

2672 

2772 

2778 

2781 


2945 

2948 

2956 

2961 

2964 


3125 

3146 

3152 

3170 

3178 

SWREG 000176 

239* 

419 

424 

460 

3790 

SUO = 000001 

148* 

2573 




5 WOO = 000001 

138* 

148 




SW01 -- 000002 

137* 

147 




SW02 = 000004 

136* 

146 




SW03 - 000010 

135* 

145 




SW04 r 000020 

134* 

144 




SW05 = 000040 

133* 

143 




SW06 =• 000100 

132* 

142 




SW07 = 000200 

131* 

141 




SWOB = 0004C0 

130* 

140 




SW09 = 001000 

129* 

139 




SW1 = 000002 

147* 





SW10 = 002000 

128* 

893 



2880 

SW11 = 004000 

127* 

2623 

2781 

2837 

SW 1 2 = 010000 

126* 

899 



2827 

SW 1 3 = 020000 

125* 

2526 

2672 

2772 


3178 

3194 




SW14 - 040000 

124* 

846 




SW 1 5 - 100000 

123* 

2567 




SW2 = 000004 

146* 





SW3 = 0000 10 

H5* 





SW4 = 000020 

144* 





SW5 = 000040 

143* 





SW6 = 000100 

142* 





SW7 -* 000200 

141* 





SW8 ' 000400 

140* 

2865 




SW9 = 001000 

139* 

3073 




S2B1G 017213 

527 

4315* 




TAB 016150 

3260 

4167* 



3222 

TARGET 013154 

2317* 

2858 

3048 

3051 

3527* 

3529* 

3540* 

3542* 


TB1TVE= 000014 

181* 


760* 



TESTS 002232 

756 

759 



TXVEC s 000060 

188* 





TPvEC - 000064 

189* 





TRAPvE s 000034 

187* 






0 11 

:23 PAGE 106 
- USER SYNBOLS 


3A87 3497* 


4116* 

2555 4268* 


2186 

2650* 

2853 

2856 

1274 

1471 

1533 

1548 

2122 

2231 

2245 

2261 

460* 

461* 

846 

893 

2827 

2832 

2837 

2865 

2976 

2984 

2987 

2995 

3194 

3803 

3790 

3827* 

3977 


SEO 0133 


1586 

2376 

1673 

3964* 

1839 

1949 

899 

2526 

2567 

2573 

2873 

2877 

2880 

2940 

3071 

3990* 

3073 

3099 

3111 


2948 

2940 


2964 

2956 


2987 

2976 


3125 

2995 


3071 


3111 


5146 3170 


5468* 5486 


3495* 3504* 


3509* 5512 


3514* 


3516* 


CZRXBFO RX11 INTERFACE TEST HACYll 30AC1052) 29-HAY-79 08 

CZRXBF.P1T 08-KAY-79 14:22 CROSS REFERENCE TABLE - 


TRKCNT 

015152 

2709* 

2727* 

2742* 

5473* 

5474* 

trklbt 

001660 

478 

4850 




TRTVEC= 

000014 

182* 





TSECTO 

015444 

2518* 

5575* 

2855 

5049 

5052 

5227 

typadr 

012076 

2981 

5082 

3203 

52210 


T YPCG9 

012246 

5205 

52550 




TYPc r 

104401 

412 

466 

467 

471 

476 



856 

841 

842 

848 

849 



2545 

2546 

2549 

2552 

2555 



2848 

2942 

2945 

2958 

2959 



5085 

5088 

5092 

3097 

3115 



5180 

5181 

3196 

5198 

5204 



5256 

5258 

5255 

3260 

5261 



5848 

5897 

3900 

3904 

39520 

typerr 

011256 

5078 

50850 




TYPOC = 

104402 

5804 

59550 




TYPON = 

104404 

2542 

2545 

2548 

2551 

2554 

TYPOS = 

104405 

475 

491 

496 

517 

522 


5214 

5225 

5230 

5257 

59540 

TONOTH 

002204 

7550 

760 




T 1 

002646 

760 

9180 




T 10 

004166 

765 

17160 




Til 

004254 

765 

18080 




T12 

004244 

765 

18050 




T15 

004520 

765 

18240 




TK 

004444 

765 

19070 




T 1 5 

004656 

765 

20400 




116 

004776 

765 

20950 




T 1 7 

005244 

765 

21740 




T 2 

002766 

760 

10750 




T 20 

005510 

766 

22820 

2906 



T21 

005554 

766 

25170 




T21X 

005656 

2551 

25350 

2415 



T 22 

005720 

766 

25890 




T25 

005776 

766 

24080 




T 24 

006044 

766 

24240 




T24X 

006052 

24250 

2438 


2971 


T25 

006076 

766 

24570 

2790 


T26 

006110 

766 

24480 




T 5 

005510 

760 

15170 




T4 

005446 

760 

13730 




T5 

005612 

760 

14520 




T6 

004056 

760 

16160 



2409 

T6F in 

004054 

1617 

16220 

1809 

2392 

T 7 

004170 

760 

17240 



2599 

T7EHPT 

004200 

1724 

17260 

1810 

2379 

UN1TSE 

012752 

445* 

448* 

452* 

455* 

465* 

1824 

1843 

1909 

2042 

2095 



5254 

5424 

5426 

3428* 

5429* 

WRITE 

007162 

2722 

2725 

2740 

27490 


WRTDON 

007456 

2787 

28020 

2812 

2824 


WRIER 

007472 

2788 

28070 




WRT1E - 

000105 

2010 

2789 




WRTSEK 

007552 

2809 

28170 




WTOOIE s 

000115 

2050 

2792 





> E 11 

23 PAGE 107 
USER SYMBOLS 


SEO 0154 


1 


5475* 5478* 5480* 34920 


5556* 

3557* 

35650 

5566* 

5567* 

3568 

5570* 

5571 * 

480 

489 

494 

500 

515 

520 

525 

527 

875 

2460 

2467 

2476 

2484 

2551 

2553 

2540 

2575 

2675 

2774 

2775 

2776 

2829 

2842 

2845 

2979 

2982 

2998 

3005 

3008 

5012 

5080 

3081 

5117 

5120 

3122 

3123 

5149 

3150 

5172 

5173 

3209 

3210 

5212 

3217 

3218 

3221 

3226 

5235 

5264 

5611 

3716 

5801 

5802 

3805 

3818 

5829 

5999 

4108 







5096 

5265 

39550 






2464 

2481 

2537 

2680 

2845 

3005 

3090 

5200 


469* 

547* 

670 

831 

865* 

903* 

1490 

1595 

2589 

2529 

2561 * 

2851 

2980* 

2993* 

5068* 

5184 

545 1 

3455 

5455* 

5436* 

54410 

5445 

5447 

5573 


CZRXBFO 

RX 1 1 INTERFACE 

TEST 

HACYll 

30A( 1052) 

29-HAY 

-79 08 

CZRXBf . 

P11 08-HAY-79 

K:22 


CROSS REFERENCE 

TABLE - 

UTRDCX 

0071H 

2453 

2736* 




XERROR 

006260 

221 

2518* 




XFRBYT 

007236 

2761 A 





XHOHE 

010032 

2871 

2883* 




X 10 

013162 

3469* 

3470* 

3473 

5496* 

5525 

XOO 

013160 

3471* 

34 72* 

34 74 

5495* 


XPA1GE 

012404 

3318* 

3336 




XREAD 

010046 

2890* 

2913 

5131 



XSA202 

001612 

444 

457 

462 

464 

468 

XSCOPE 

006524 

217 

2587* 




XSDN 

006764 

2638 

2694* 




XSUBSC 

006544 

2602* 

3964 




XURITE 

007166 

2750* 

2767 

2805 



XWTRDC 

007120 

2737* 

2746 




XXPATG 

012454 

3345* 

334 7 

3356 



(AUT08 

015072 

428* 

3798 

3919* 



SCHARC 

013750 

3613* 

3623* 

3630 

3659* 

5644* 

SCKSWR 

014316 

3790* 

3959 




(CNTlG 

015043 

3801 

3914* 




SCNTLU 

015036 

3818 

3913* 




SCRLF 

013765 

3612 

3654* 

3829 

3915 


SD32D 

015376 

4023 

4041* 




SDECVL 

015556 

4043 

4089* 




(FlLLC 

013762 

3616 

3651* 




SF ILLS 

013761 

3650* 





SGTSWR 

014366 

3802* 

3957 




SHO s 

000003 

18 

19 




(lLLUP 

015324 

3969 

3985 

4004* 



(1NTAG 

015073 

3830 

3920* 




*LF 

013766 

3655* 

3904 

3913 



MAIL -* 

#••••# u 

424 

3600 




(ANEW 

015061 

5805 

3917* 




(HSWR 

015050 

3802 

3915* 




(NULL 

013760 

3618 

3649* 




(OCNT 

014212 

3688* 

371 7* 

3730* 



(OHOOE 

014214 

3683* 

3687* 

3692 

5695* 

5706* 

(POWER 

015332 

3210 

4000 

4007* 



(PWRAD 

015320 

4002* 





(PWRDN 

015160 

219 

3969* 

3997 



SPURflG 

015314 

4000* 





4PWRUP 

015232 

3979 

3985* 


3915 


touts 

013764 

3653* 

3848 

5897 


tROCHR 

014600 

3861* 

3960 




tRODEC 1 

•••••* u 

3962 





iRDllN 

014720 

3889* 

3961 




(RDOCT* 

***•*• u 

3962 





tRDSZ 

000010 

3882* 





tRESRE 

014254 

3766* 

3965 




IR2A r 

••••*• y 

3964 





tSAvRE 

014216 

3750* 

3962 



4006* 

ISAVR6 

015330 

3978* 

3986 

3987* 

5988* 

4SB20 

015342 

4021* 

4117 


3919 


(SETUP- 

000114 

241* 

421 

3785 


SSTUP - 

177777 

241* 





(SUR - 

160000 

18 

19* 

4003 


3871 

TKB 

0U3H 

3782* 

3794 

3811 

3865 


f 11 

23 PAGE 1 08 
USER SYMBOLS 


SEQ 01 35 


4 701 


37521 


CZRXBFO 

R X 11 1N1ERFACE 

TEST 

RAC til 

50A( 1052) 

29-RAt 

-79 08 

0 11 

:2 5 PAGE 

109 

CZRXBf . 

P11 08-RAY-79 

14:22 


CROSS REFERENCE 

TABLE - 

- USER SYR80LS 

sus 

OH512 

5781# 

5792 

5808 

5852* 

5865 

5869 


SIN = 

000001 

18# 







S INPUR 

015506 

4048 

4049 

4069# 





S1PB 

015756 

5656* 

5648# 






stpflg 

015765 

5594 

5652# 






SIPS 

015754 

5654 

5647# 






S1RAP 

015074 

225 

5929# 






S1RAP2 

015116 

5940# 

5951 






S1RP = 

000014 

5944# 

5965# 

5955# 

5954# 

5955# 

5956# 

5957 

5958# 

S1RPAD 

015150 

5954 

5951# 






SI T t IN 

if v DDL - 

015026 

5890 

5891 

5908 

5912# 




® I TrBM- 
* t wfirtc ~ 









« 1 T rub- 


jvjO 







STYPE 

015554 

5594# 

5944 

5952 





STYPEC 

015704 

5615 

5622 

5629 

5654# 

5655 

5854 


STYPEX 

015752 

5640 

5642 

5645# 





S1YP0C 

014014 

5686# 

5955 






lit PON 

014050 

5685 

5688# 

5955 





S1YPOS 

015770 

5681# 

5954 






SOf 111 

014215 

5682* 

5686* 

5696 

5751# 




r 

017656 

207# 

209 

210# 

216# 

227# 

250# 

254# 



5647 

5648 

5649 

5650 

5651 

5652 

5655 



5915 

5919 

5920 

5921 

5981 

4005 

4089# 


1 


SfO 0156 


5959 5960# 5961# 596?# 5965# 596*.# 


257# 2<.2# 298# 888# 1804 2692# 
565 A 5655 5656 5 7 81 5782 5912# 
<.555# 


CZRXBFO RXli INTERFACE TEST HACYll 50A(1052) 29-HAY-79 08 

CZRXBF.PU 08-HAY-79 1A:22 CROSS REFERENCE TABLE - 


COHNEN 

If 

Sf 

1 91 f 

565 

68A 

928 

982 

168A 

1 748 

1859 

1925 

1995 

2208 

228A 

ENOCON 

If 

Sf 

1 91 f 

6A8 

7A9 

95A 

1012 

1705 

1792 

1892 

19A5 

2026 

2227 

2301 

ERROR 

85f 

561 

681 

926 

980 

10A0 

1132 

ISA 7 

1 SS8 

1606 

16A8 

1682 

1 7A6 

1858 


2109 

2121 

2135 

2206 

22 AA 

2260 

2270 

ESCAPE 

If 

i91f 






GETPRI 

If 

1 9 1 f 






GETSUR 

If 

Sf 

1 9 1 f 

A 2 1 




wult 

If 

1 91 f 






H7727 

2A9f 

617 

750 

1 A A 8 

1773 

1863 

1999 

N78A6 

24 7 f 

562 

683 

927 

981 

1 OA 1 

1085 


2207 







NEWTST 

If 

1 9 1 f 






POP 

If 

191 f 

3771 

3990 

3991 



PUSH 

If 

1 91 f 

5751 

3971 

5977 



REPORT 

If 

1 91 f 





1607 

SCOPE 

86f 

5A9 

1065 

1501 

1359 

1 A 20 

SETPR1 

If 

Sf 

19U 

1358 

15A5 

1398 

1A05 

SETTRA 

39AAf 

3955 

59 5 A 

5955 

5957 

5959 

3960 

SETUP 

If 

1 91 f 






SUP 

If 

1 91 f 






SLASH 

If 

1 9 1 AT 






SPACE 

1 91 f 






265 

STARS 

If 

Sf 

1 91 f 

252 

253 

25A 

386 

597 

2510 

2511 

2515 

2516 

2715 


53S8 

5367 

5A22 

5A8A 

5A99 

3519 

3552 


5967 

5985 

A 0 1 2 

AC50 

A091 

A5A8 


SWRSU 

If 

1 91 f 






TRRTRP 

39AAf 







TYPB1N 

If 

1 91 f 






TYPDEC 

If 

191 f 






TYPNAN 

If 

1 91 f 






T YPNUH 

If 

1 91 f 





28AA 

TYPOCS 

If 

Sf 

1 9 1 f 

A 72 

2A62 

2A79 

typoct 

If 

191 f 

5805 





typtxt 

If 

1 91 f 






HE SC A 

If 

1 91 f 






tSNEUT 

If 

191 f 




5959 

5960 

tlSET 

59AAf 

5955 

595A 

5955 

5957 

USK1P 

If 

191 f 






.EQUAT 

If 

Sf 

81 





.HEADE 

If 

Sf 

8 





. K T 11 

If 







.SETUP 

If 

Sf 

2A1 





. SWRHl 

If 







. SAC T 1 

If 







, SAPTB 

If 







.SAPTH 

If 







.IAPTY 

’f 







.5ASTA 

If 







.SCATC 

If 







. SCNT A 

If 







. 50B2D 

If 

Sf 

-.028 





.10820 

If 








H 1 1 

23 PAGE T'l 

NACRO NAAES SC 0 0157 


10A2 

1086 

115A 

1205 

1 AAA 

1 503 

1560 

1650 

25A8 

26A9 






1660 

1061 

1121 

116A 

1225 

1A67 

1529 

1582 

2572 

266A 






1501 

1205 

1255 

1273 

1297 

15 <2 

1A15 

1AA2 

1857 

1925 

1965 

1980 

1995 

2056 

2069 

2085 

25A6 

26A8 







2352 

1153 

120A 

1502 

1559 

16A9 

1683 

1 7A 7 

192A 


1707 

1 796 

1896 

2050 

208A 

2136 

2271 


5961 

5962 

5965 

596A 





266 

267 

272 

273 

27A 

295 

29a 

295 

2731 

51 A 1 

5275 

3296 

5505 

3350 

3558 

5SA9 

5579 

3658 

5755 

5780 

3785 

585 3 

5882 

5925 

500A 

3199 

52 ’5 

3222 

5229 

3256 




5961 


396? 


596 3 


596A 


i 


CZRXBfO Rxll INTERFACE TEST HAC 1 1 1 30AJ1052) 29-MAY-79 08:23 PAGE 112 

CZRX9F.P11 08-MAY-79 H:22 CROSS REFERENCE TABLE — MACRO NAMES 


.iDlV 

1* 



.SEOP 

If 



.tERRO 

If 



.iERRT 

If 



.tMULT 

If 



.tPOUE 

If 

5f 

3965 

.SR AND 

If 



.SRDDE 

If 



.SRDOC 

If 



.SREAD 

If 

5f 

3778 

.SR2AZ 

If 



. tSAVE 

If 

5f 

3753 

.SSB2D 

If 

5f 

AO 1 0 

. SS820 

If 



.SSCOP 

If 



.(SIZE 

If 



.SSUPR 

If 



. STRAP 

If 

5f 

5921 

.STyPB 

If 



.stypd 

If 



.STyPE 

If 

5 » 

35 7 7 

.STyPO 

If 

5f 

5656 

. SAOCA 

If 



.1170 

If 



. ABS. 

01 7t>56 

000 



ERRORS DETECTED: 0 

DS*2 : CZRXBF ,DSK7:CZRXBF . SEQ/CRF /SOL -[400. 1 066 JSySMAC .SML .U 00.2A65 3CZRXBF .PI 1 
RUN-TIME: 56 <.9 5 SECONDS 
RUN-TIME RATIO: 363/90=A.0 
CORE USED: 53x <65 PAGES) 


SEQ 0138 


i 


i 

i 


